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1. VORWORT 


Entsprechend den vielfältigen Einsatzmöglichkeiten richtet sich MSR- 
BASIC an einen weiten Kreis von Anwendern. 


Das vorliegende MSR-B8ASIC-Handbuch stellt hinsichtlich Darstellung und 
Umfang einen Kompromiß dar. 


Diejenigen MSR-BASIC-Befenle, die zum Standard-Sprachumfang von BASIC 
gehören, werden sehr knapp beschrieben, während die MSR-spezifischen 
Befehle in der gebotenen Ausführlichkeit benandelt werden. 


Die Methodik der Darstellung ist von dem Ziel geprägt, das jeweilige 
Grundprinzip der einzelnen MSR-BASIC-Befehle knapp und allgemein zu ver- 
mitteln, andererseits durch praktische Beispiele Anwendungshinweise für 
den MSR-Bereich zu liefern. 


Aus diesem Grund werden die Befehle nicht in ihrer alphabetischen Reı- 
henfolge beschrieben, sondern im Rahmen funktionell verwandter Befehls, 
wie z.B. 

- Echtzeitbefehle 

- Programmflu8steuerbefehle 

- Zeichen-Ein-/Ausgabe-Befenle 


Das Handbuch kann natürlich kein Ersatz für eine Schulung sein. 


Bei entsprechendem Bedarf bitten wir Sie, sich an Ihren MSR-3ASIC-Händler 
bzw. an THERMOPLAN zu richten. 
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Datum: 15.3.1991 


MSRBASIC Version 4.1.4 


Die neue MSRBASIC-Version für den Z80-MiniEmuf wir mit dem 


Monitor in einem EPROM ausgeliefert. 


Wie bisher ist zwischen zwei Versionen zu unterscheiden: 


MSRBASIC/16 -» verwaltetes BASIC-RAM 16 KByte auf U2 


und auf U3 wird 


ein EEPROM der Typen 2864 


oder 28256 ( hieraus nur 16KByte ) unter- 


stützt. 


( Achtung: Jumper JP5 schliepen ! ) 


MSRBASIC/ 32 -» verwaltetes BASIC-RAM 32 KByte auf U2 


Für den Monitor und das MSRBASIC ist 
( ST2 ) die Konsolenschnittstelle. 


nun der serielle Kanal A 


Wechsel zwischen MSRBASIC und Monitor 


MSRBASIC -> Monitor mit dem Kommando "sys" im "nof"-Modus 


Monitor -> MSRBASIC mit dem Kommando "g0000" 


Ablage eines MSRBASIC-Programm's im EEPROM 


Mit dem neuen Kommando eepromit wird 
EEPROM transferiert. 


ein MSRBASIC-Programm ins 


Achtung! 


Nach der Ausführung des Kommandos ist das Programm im BASIC-RAM 
gelöscht. Nach einem erneuten PowerUp oder einem gO0000 aus dem 
Monitor heraus steht das Programm wieder im BASIC-RAM zur 


Verfügung. 

Das BASIC-Programm wird im EEPROM in 
ist also sehr kompakt. Hier gilt für 
(8 KByte):Ist das Programm im BASIC- 
es in jedem Falle im EEPROM abgelegt 
ist noch nicht bekannt ). 


tokenisierter Form abgelegt, 
ein EEPROM des Typ's 2864 
RAM entwickelbar ist, kann 
werden ( ein Gegenbeispiel 


————— 


EEE 
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Ablage eines MSRBASIC-Programm's im EPROM 


x Mit dem Kommando promit ohne Optionen wird das komplette MSR- 
| BASIC und, so vorhanden, ein MSRBASIC-Programm über die Konsolen- 
| schnittstelle im Intel-Hex-Format ausgegeben. Will man den Sok- 
| kel U3 des 280-MiniEmuf mit einem Eprom anstelle des vorgesehe- 
| nen EEPROM benutzen um von dort aus ein MSRBASIC-Programm zu la- 
den, so ist das Kommando promit &H8000 abzusetzen. Die Intel-Hex 
kodierten Zeichen sind dann an der Konsolenschnittstelle "aufzu- ` 
fangen" ( siehe PDV-TERM ) und in einer Datei abzulegen. Diese | 
Datei muß dann mit einem Intel-Hex -fähigen EPROMer in ein 2764 

( oder 27256 ) programmiert werden. 

In Zweifelsfällen rufen Sie uns an. 

Zeileneditor 


Der Zeileneditor wurde überarbeitet sowie ein auto-Kommando 
eingefügt. 

Das auto-Kommando nummeriert die Zeilen automatisch und besitzt 
folgende Syntax: 


auto [ Startzeilennummer [, Schrittweite]] CR 


Werden keine Optionen angegeben, so benutzt auto als 
Voreinstellung 


Startnummer - 10 und Schrittweite - 10 


Der Zeileneditor befindet sich grundsätzlich im Einfügemodus. 
Folgende Funktionen stehen zur Verfügung: 


Cursor nach links -» CTRL-A 
nach rechts -> ΟΕΕ ! 
Anfang/Ende einer Zeile -> CTRL-B 
Löschen Zeichen links -> DEL, BS e 
unter Cursor -> CTRL-G P 
ganze Zeile -> CTRL-X ee, _, 
Eingabe beenden v» ER 


abbrechen -> CTRL C 
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Peek/Pooke-Funktionen 


Von den Anwendern wurde immer nach diesen Funktionen gefragt. 
Sie stellen eine nicht zu unterschátzende Gefahr für ein 
Programmiersystem dar, das in Prozeßanwendungen sicher 
funktionieren soll. Da aber die Entmündigung der Anwender nicht 
unser Ziel ist, wurden diese Funktionen implementiert. Sie 

en sollten aber mit Vorsicht benutzt werden. Nun zur Syntax: 


a$ 
inhalt 


PEEK(addr) AS 2H ; [ 0 <= addr <= 65535 ] 
PEEK(addr) 
POKE( addr, wert ) [ 0 <= addr <= 65535 ] 
[ 0 <= wert <= 255 ] 


Eingabe/Augabe/Zuweisung von Sedezimalzahlen 


Sedezimal(Hex)zahlen können nun wie folgt behandelt werden: 


we wo 


Eingabe -> ... AS nH ; n ( sinnhafte) Anzahl 
Ausgabe wie Eingabe 


Zuweisung Präfixnotation von &H , Beispiel: 
ADDR = &H1000; 
Arithmetik 
Die Arithmetik wurde gänzlich überarbeitet, was zu einer 
deutlichen Geschwindigkeitssteigerung führte. Die zeitliche 


Konsequenz kann mit einer Halbierung der Laufzeit bei einem 
normalen Programm angegeben werden. 


Anderungen der Befehlskurzformen 


- Folgende Befehlskurzformen wurden aus Konfliktgründen geándert: 


P (PRINT) 2359 

G (GOTO ) -» GO 

I (INPUT) -» IN | 
N (NEXT ) -» NX | 
W (WAIT ) -> WT 

R (REM ) -> REM 


Weiterhin besitzen alle 3-Buchstaben-Befehle keine Abkürzungen 
mehr. 


NOFREEZE ist jetzt nur noch in der Kurzform NOF verwendbar. 
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Anderungen der Meldungen 


'READY => CM à 
' ERROR -=--> 'Pehler : 
'syntax- or value-error' --» 'Fehlerhafte Syntax oder Zuweisung' 
'INPUT ERROR, TRY AGAIN' --> 'INPUT Fehler j 
'MEM FULL ' ==> "Speicher voll ; 
'BYTE FREE ' --» 'freie Bytes ) 


Änderungen von Funktionsnamen 


'UPPER_SCREEN ' --» 'WINDOW' 
"TIME FACTOR "ow μες, 


Weitere Änderungen 


'ERRVAR' ist eine Systemvariable, die die letzte Fehlernummer 
enthált 
'ONERROR' UP Definition die bei Fehler ausgeführt wird 


'USR ' --» wird später syntaktisch geändert 
'CALL ' =--> wird später syntaktisch geändert 


Bei LIST oder SAVE werden hinter Token / Variablen kein zusätzli- 
ches Blank mehr ausgegeben, wenn ein ")", "," oder ";" folgt. 


Bei der formattierten Ausgabe werden keine Formatfüller "*" 
ausgegeben, notfalls werden mehr Stellen ausgegeben oder es 
wird das xEy Format benutzt. 


Neu unkt e 


ASC() Neue Funktion. Gibt die ASCII-Codenummer des ersten 
Zeichen des Aufrufparameters als Floatzahl zurück. 
z.B. ASC("ABC") gibt den Wert 65.0 zurück. 


SGN (Xe) Neue Schaltreglerfunktion. Liefert -1 oder 1 abhängig 
vom Vorzeichen des Parameters Xe. 


SAT (F, Fmax, Fmin) 
Neue Begrenzerfunktion. Liefert Intervallgrenzen, wenn 
F diese Grenzen über- oder unterschreitet, ansonsten F. 
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(C) PDV-Systeme 22. April 1987 


Schlagworter 


sortiert nach 


Seite 


Schlüsselwörter 


Schlagwörtern 


1 von 3 


Hdb.-Seite 


Array-Deklaration 
Ausgabe ASCII-Zeichen 


Datei-Funktionen 


DATUM 


Debug-Funktionen 


Echtzeit-Anweisungen 


Editor Cursor links 
rechts 

Löschen Cursor-Zeichen 

links v. Cursor 


Zeile 
Programm 
Ende 
Abbrechen 


Textlayout (WordStar) 
Zeige Text formatiert 

Kurzform 
Sichere Text 


Einlesen ASCII-Zeichen 


Kommentar 
Logische-Funktion 


Math.-Funktionen 


DELETE 
EOF(LU) 


DATE$ 


TRACE 
NOTRACE 
TASKLIST 
SEQLIST 


DEFINE 
ACTIVATE 
START 
SUSPEND 
FREEZE 
NOFREEZE 
WAIT 


BS oder ^ 
TAB oder ^ 
^G 
DEL 
x 
NEW 
CR 
“C oder °P 


= = 


PUNKTBEFEHLE 


LIST 
SAVE 
SAVE 


INPUT 
INCHAR$(LU) 


REM 
NOT(X) 
ABS(X) 
ACN(X) 


ASN(X) 
ATN(X) 
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Schlagwörter 


Peripherie-Informationen 


Programm-Ablaufsteuerung 


Programm-Ende 
Programm-Laden 
Programm-Start 


Prozeßperipherie-Lesen 


Prozeßperipherie-Schreiben 


Regler-Funktionen 


Status-Funktion 


String-Funktionen 


Terminieren 


Unterprogramm 


Variablen-Löschen 


Vektorisierte Ein-/Ausgabe 


Vektorisierte Regler 


Window-Variable 


sortiert nach Schlagwörtern 

Seite 2 von 3 

Schlüsselwörter Hdb.-Seite 
NADC 31 
NCNT 31 
NDAC 31 
NDIN 31 
NDOUT 31 
FOR 46 
NEXT 48 
GOTO 51 
IF 52 
THEN 52 
ELSE 52 
STOP 54 
END 55 
LOAD 79 
RUN 82 
ADC(N) 29 
CNT(N) 29 
DIN(N) 29 
GET(N) 29 
DAC(N) 29 
DOUT(N) 29 
CNT(N) 29 
PUT(N) 29 
PID 35 
GPID 35 
PI 35 
GPI 35 
STATUS(LU) 45 
CHR$(x) 12 
INSTR 73 
LEFT$(Q$,N) 72 
LEN(X$) 12 
MID$(Q$,N,M) T2 
RIGHT$(Q$,N) 72 
VAL(X$) 72 
SYST 77 
CALL 74 
GOSUB 49 
RETURN 50 
VCL 83 
MADC (MO). 30 
MDAC (SO) 30 
MDIN(MO) 30 
MDOUT (SO) 30 
VEC Y= PI( ) 36 
UPPER-SCREEN 38 


MSRBASIC 4.0 Schlüsselworter sortiert nach Schlagwortern 


(C) PDV-Systeme 22. April 1987 Seite 3 von 3 
Schlagworter Schlüsselworter Hdb.-Seite 
WOCHENTAG DOW$ 32 
ZEIT TIME$ 32 
Zeitdauer-Abwärtszähler TDOWN (N) 32 
Zeitdauer-Aufwärtszähler TUP(N) 32 
Zeitfaktor TIME-FACTOR 33 


Zuweisung LET 58 
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Nachdem in der letzten Ausgabe von MC die Hardware des "endgulti- 
gen Z80-EMUF'" beschrieben wurde, beschreibt dieser Artikel die 
bereitgestellte Software - einen pfiffigen Basic-Interpreter mit 


dem einprägsamen Namen MSRBASIC. 


Nicht schon wieder einen BASIC-Interpreter! Sterben diese prähi- 
storischen Gebilde denn nie aus? So, oder ähnlich klingt es mir 
in den Ohren, während ich an meinem Schreibtisch sitze und dar- 
f» über nachdenke, wie ich Ihnen den Mund wässrig machen kann. Zuge- 
geben: Als Zeitgenosse der MFLOP's erscheint MSRBASIC ein Ana- 
chronismus schlechthin zu sein; aber schauen wir uns das "Urvieh" 


doch einmal näher an. 
Geschichtliches 


MSRBASIC wurde am Lehrstuhl für Steuerungs- und Regelungstechnik 
der Technischen Universität München entwickelt. 

Zielintention der Entwicklung war die Schaffung eines Program- 
miersystems für eine breite Schicht von Anwendern aus den Berei- 
chen Steuerungs-/Regelungstechnik, Verfahrenstechnik, Chemie, 
Physik, Medizin u.a. . Es sollte also ein Werkzeug konstruiert 
werden, mit dessen Hilfe man in den 0.9. Anwendungsbereichen 
(programmtechnische) Lösungen von Problemstellungen erarbeiten 
konnte. Die Entstehung fachfremder (programmtechnischer) Proble- 
matiken sollten vermieden werden, damit bei der Benutzung des zu 
schaffenden Programmiersystems die Konzentration bei der Bearbei- 


/ Ἐπ der fachspezifischen Problemstellung verbleiben konnte. 
Werkzeug MSRBASIC in einer Kurzübersicht 


Die o.g. Anforderungen sind hoch. Wie stellt sich das Werkzeug 


MSRBASIC seinem Benutzer nun dar ? Hier eine kurze Übersicht: 


- Sprachbasis des MSRBASIC’s ist MBASIC von Microsoft 
- zusätzliche MSRBASIC Sprachkonstrukte: 


a) TASK Definition und Planung von Programmteilstücken, die 


zeitzyklisch bearbeitet werden, Anzahl 5 
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b) SEQUENZ Definition und Planung von Programmteilstücken, 
in denen Weiterschaltbedingungen formuliert 
werden können. Mit diesem Sprachkonstrukt lassen 


sich häufig benötigte Ablaufsteuerungen realisieren, 
Anzahl 25 


ο) DIN(KN) DigitalerINput(KanalNummer ) 

DOUT(KN) DigitalerOUTput(KanalNummer) 

ADC(KN) AnalogDigitalConverter(KanalNummer ) 

DAC(KN) DigitalAnalogConverter(KanalNummer) 

Diese Sprachkonstrukte ermöglichen einen hardwareun- 
abhängigen Zugriff auf die Prozeßperipherie. Die 
Benutzung dieser Konstrukte setzt wohl den Anschluß 
einer vorliegenden Hardware an die Sprachkonstrukte 
im Rahmen einer Implementierung voraus, fordert 
dabei aber Spezialisten und nicht den Benutzer. 

d) TUP(N) TimerUP(Nummer) 

TDOWN(N) TimerDOWN(Nummer) 
Zeitdauer-Aufwärts/Abwärts-Zähler die als 
eindimensionale Felder vereinbart werden kónnen, 
gezähltes Zeitquantum ist 10 ms. Die Anzahl der 


Zähler ist nur vom Speicherplatz beschränkt. 


e) PI- 

PID- Reglerfunktionen, jeweils in einem Stellungs- oder 
einem Geschwindigkeitsalgorithmus. Die Reglerfunk- 
tionen sind vom Benutzer nur mit den notwendigen Pa- 
rametern zu versehen. 

f) Vektor- 


Matrix- Arithmetik, diese fast mit max. Prozessorgeschwin- 
digkeit 


g) Status- und Kommandofunktionen für serielle Schnittstellen 


- zusätzliche Fähigkeiten 


a) Autoload- und Autostartfunktion 


b) EPROM-fähiger Zwischencode 


Nun ist die Kurzübersicht wohl eher zu einer Langübersicht gera- 
ten. Sollten Sie aus der Kurzübersicht den Verdacht gewonnen ha- 
ben, daß MSRBASIC "echtzeitfähig” ist, liegen Sie richtig. 
Echtzeit- und multitaskingfähiges MSRBASIC 
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Programmiersysteme, die in der Lage sind, auf ein Prozeßereignis 
in einer vorhersagbaren Zeit zu reagieren (Ereignierkennung und 
Bereitstellung der für diese Situation erforderlichen Daten) , 

nennt man "echtzeitfähig”. Dabei ist die tatsächliche Dauer der 
Reaktionszeit nebensächlich, wichtig ist allein, daß in einer 

vorhersagbaren Zeit reagiert werden kann. Die tatsächliche Dauer 
der Reaktionszeit sagt nur etwas über die Leistungsfähigkeit ei- 


nes "echtzeitfähigen"” Programmiersystemes aus (siehe DIN 44 300). 


Echtzeitfähigkeit ist gut - Multitaskingfähigkeit aber etwas an- 
deres. Zum Multitasking kam man vor dem Hintergrund der Erkennt- 
nis, daß die CPU eines Rechners selten richtig ausgelastet ist 
(z.B. Kommunikation mit langsamen Peripheriegeräten u.a.). Wäre 
man in der Lage, der nach " sinnhaften" Tätigkeiten schmachtenden 
CPU eine andere Aufgabe (task) zur Bearbeitung zu übergeben, 
könnte die sich, statt Däumchen zu drehen, schon einmal damit be- 
schäftigen. Begnügt man sich nicht mit dem: "Wäre man in der Lage 
..." muB man sich eine Verwaltungsinstanz konstruieren, die die 
Aktivitäten der CPU in geordnete Bahnen lenkt. Derartige Verwal- 
tungsinstanzen nennt man in Multitaskingsystemen Prozeßumschalter 
oder auch Dispatcher. An ein echtzeit- und multitaskingfähiges 


Programmiersystem sind somit folgende Forderungen zu stellen: 


a) Es müssen Sprachmittel zur Verfügung stehen, die die Formulie- 
rung von mehreren Aufgaben (weiterhin Task’s) gestatten. 

b) Es müssen Sprachmittel zur Verfügung stehen, die die zeitliche 
oder ereignisorientierte Ein- bzw. Ausplanung der Task’s ge- 
statten. 

c) Es muß eine Instanz vorhanden sein, die die formulierten Ein- 
bzw. Ausplanungen zur Ausführung bringt und nach Möglichkeit 
Mittel zur Beseitigung programmtechnischer Fehler bereit- 
stellt. 


MSRBASIC-Sprachmittel zu Punkt a) 


MSRBASIC bietet die Vereinbarung von Task’s und die Vereinba- 
rung von Sequenzen an. Task’s und Sequenzen werden wie BASIC- 
Unterprogramme formuliert mit dem Unterschied, daß sie der 


Planungsinstanz vor Benutzung bekanntgegeben werden müssen. 


Weiche 


Beis 


10 
20 
50 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 


2000 
2010 
2020 
2030 
2040 


3000 
3010 
5020 
3030 
$5040 
3050 
3060 
3070 
3080 


4000 
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piel: 


REM Beispiel der Task und Sequenzvereinbarung 
REM Initialisierung verwendeter Variablen 

Tp = 1.9 : INP$ = "NT Z SER-1 = O 

REM Tp soll die PlanungsZeit-Variable sein, mit der 
REM Bedingung O.O1s <= Tp <= 2.54s 

REM 

DEFINE TASK 1, Tp „ 2000 

DEFINE SEQUENZ 1, 3000 

UPPER-SCREEN = 10 

REM 

ACTIVATE TASK 1, SEQUENZ 1 

REM 

STOP 


REM Hier ist die Aufgabe der TASK 1 formuliert 
REM 

PRINT "»»» Task 1: -» Testausgabe «- 

REM 

RETURN 


REM Hier ist die Aufgabe der SEQUENZ 1 formuliert 
REM W 
WAIT FOR INP$ ="J" 

SUSPEND TASK 1 

PRINT 

PRINT ">> SEQUENZ 1: TASK 1 wurde suspendiert; 

PRINT 

REM 

RETURN 


END 
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In der Zeile 70, des vorstehenden Programmbeispiels, wird die 
TASK-1 der MSRBASIC-Planungsinstanz "REALTIME-MONITOR" bekanntge- 
geben durch das Schlüsselwort DEFINE, gefolgt von der Angabe der 
TASK-Nummer nach dem Schlüsselwort TASK , des Aufrufintervalls 
und der Zeilen-Nummer, ab der der TASK-Programmkörper formuliert 
ist bzw. wird. Das Aufrufintervall wird als Real-Zahl notiert mit 
den in Zeile 50 angegebenen Grenzen. In ähnlicher Weise wird nun 
eine Sequenz vereinbart (Zeile 80) wobei die Angabe des Aufrufin- 
tervalls entfällt. 

In Zeile 90 wird der MSRBASIC-Systemvariable UPPER-SCREEN der 
Wert 10 zugewiesen und damit gleichzeitig die Bildschirmfenster- 
verwaltung aktiviert, die nun dafür sorgt, daß alle programmtech- 
nischen Zeichenausgaben auf dem Konsolen-Kanal in ein oberes Fen- 
ster geschrieben werden (hier 10 Zeilen groß) und alle Dialoge 
mit dem Interpreter über das untere Fenster abgewickelt werden 
(hier 24-10-14 Zeilen). Voraussetzung für diesen Zwei-Fensterbe- 
trieb ist ein TVI925-Terminal bzw. ein diesen Terminaltyp emulie- 
rendes Terminalprogramm. 

Weiterhin wird durch die Anweisung in Zeile 110 dem REALTIME- 
MONITOR durch das Schlüsselwort ACTIVATE mitgeteilt, daß er nun 
für die Ausführung der deklarierten TASK-1 und der SEQUENZ-1 zu 
sorgen hat. 

Da für den MSRBASIC-Interpreter direkt nichts mehr zu tun ist, 
wird er durch die Anweisung STOP in Zeile 130 an weiteren Aktivi- 
täten gehindert. Diese Anweisung ist wichtig, weil der Interpre- 
ter sonst nicht davon abgehalten werden kónnte, den ab Zeile 2000 
formulierten TASK-Programmkörper zu exekutieren. Wohin soll er 
aber zurückkehren, wenn er in Zeile 2040 auf die Anweisung RETURN 
trifft 2 

Die ab Zeile 2000 bis 2040 formulierte TASK-1 macht nun nichts 
anderes, als gemäß ihrer Vereinbarung im Zeitabstand von Tp- 1.0 
(zeitzyklisch) die in Zeile 2020 formulierte Meldung in das obere 
Bildschirmfenster zu schreiben. 

Gleichzeitig lauert die ab Zeile 3000 bis 3080 formulierte SE- 
QUENZ-1 in der Zeile 3020 darauf, daß die Stringvariable INP$ ir- 
gendwann einmal den Großbuchstaben "J" enthält. Der nachfolgende 
Programmkörper der SEQUENZ-1 wird also erst dann ausgeführt, wenn 
diese "Weiterschaltbedingung” erfüllt ist. Nun überlasse ich es 


dem Leser selbst nachzuvollziehen was passiert, wenn die String- 


Weiche Ware für den "endgültigen ZBO-EMUF" Seite 6 


variable INP$ durch eine Zuweisung den Inhalt "J" erhält. 


MSRBASIC-Multitasking, Programmtypen und ihre Prioritäten 


Bei der Betrachtung des Beispielprogrammes gewinnt man diffus den 
Eindruck, daß unterschiedliche Ablaufstrategien die Funktion des 


Gesamtprogrammes bestimmen. Strukturieren wir das: 


a) Das Programmstück ab Zeile 10 bis Zeile 130 wird offen- 
sichtlich sofort nach einem Programmstart (Kommando RUN) 


durchlaufen. 


b) Das Programmstück ab Zeile 2000 bis Zeile 2040 ist als 
TASK-1 vereinbart und wird durch den REALTIME-MONITOR ent- 
sprechend seines Aufrufintervalles zeitzyklisch zur 


Ausführung gebracht. 


C) Das Programmstück ab Zeile 3000 bis Zeile 3080 ist als 
SEQUENZ-1 vereinbart und wird in seinem Laufverhalten vom 
SEQUENZ-HANDLER, einem spezialisierten Programmteils des 
REALTIME-MONITORS gesteuert. Immer dann, wenn eine formu- 
lierte Weiterschaltbedingung erfüllt ist, wird der nachfol- 


gende Sequenz-Programmkode zur Ausführung freigegeben. 
Drei Programmtypen - eine CPU ! Wie soll das Funktionieren 2 


Die o a, Verwaltungseinheit, der REALTIME-MONITOR ist die Ret- 
tung. Zuerst verlangt der mal klare Verhältnisse, d.h, der nimmt 
erst seine Arbeit auf, wenn man das FREEZE-Kommando eingegeben 
hat. Durch dieses Kommando wird der Speicher entrümpelt, ein 
Edieren des Programmkodes sowie die Schaffung neuer Datenobjekte 
verhindert. Nach dem FREEZE-Kommando kann ein Programmierer dem 
REALTIME-MONITOR nicht mehr unkontrolliert ins Handwerk pfuschen. 
Dieser Zustand bleibt solange erhalten, bis ein NOFREEZE-Kommando 
eingegeben wird. 

Alsdann teilt der REALTIME-MONITOR die Rechenzeit der CPU.in 
kleine Häppchen, sprich Zeitscheiben, von der Größe 10ms . Eine 
solche Scheibe nennt er Planungsatom und für den Programmierer 
folgt daraus, daß jede versuchte Einplanung einer TASK mit einer 
Zykluszeit < Planungsatom mit einer Fehlermeldung bedacht wird. 
Zum Schluß legt der REALTIME-MONITOR noch fest, nach welcher 
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Priorität er die Rechenzeithäppchen an die verschiedenen 


Programmtypen (s.o. a,b und c) verteilt und teilt mit: 


Zuerst bekommt der MSRBASIC-Programmtyp TASK entsprechend der 
impliziten Prioritäten Rechenzeit (TASK-1 be- 


sitzt die höchste - TASK-5 die niedrigste Prio- 


Pitar) 
dann der MSRBASIC-Programmtyp SEQUENZ und 
letztlich der MSRBASIC-Standard-Interpreter. 


ο. 


Im Hanqbuch wird der MSRBASIC-Standard-Interpreter im Echtzeit- 
betrieb auch Hintergrundprogramm genannt. Er ist aber in der Mul- 
tltasking-Umgebung nichts anderes als der Proze@ mit der niedrig- 
sten Prioritat und lebt nur vom Rechenzeitabfall anderer Prozes- 


se, wobei er als Sonderfall auch der einzige Prozeß sein kann. 


In der vorliegenden Implementation des MSRBASIC’s verwaltet der 
REALTIME-MONITOR 5 TASK’s und 25 SEQUENZen. An der Stelle mal 
schnell eine Warnung: Obwohl leistungsfähig ist der "endgültige 
Z80-EMUF” keine Micro-VAX. Deshalb verbietet sich die Konstruk- 
tion von 5 Task’s mit einem Aufrufintervall = Planungsatom. Die 
Taskprogrammlaufzeit und ihr Aufrufintervall sollten auch in ei- 
nem sinnhaften Zusammenhang stehen. Zur Fehlerbeseitigung in ei- 
ner zweifelhaften Situation stehen die Fehlersuchkommandos TASK- 
LIST und SEQLIST zur Verfügung. Genug des Multitaskings |! 


MSRBASIC hat ja auch noch anderes zu bieten. 
/ À MSRBASIC und die Prozeßperipherie 
MSRBASIC greift auf die Prozeßperipherie über 4 skalare Einlese- 


und 4 skalare Ausgabefunktionen zu. Skalar, weil sie im Gegen- 


satz zu den vektoriellen Ein-/ñusgabefunktionen nur einen Wert 


liefern. 
Einlesefunktionen Ausgabefunktionen 
ADC(KanalNummer ) DAC(KanalNummer) 
DIN(KanalNummer) DOUT(KanalNummer ) 
GET(I/O-PortNummer) PUT(I/O-PortNummer) 


CNT(KanalNummer) CNT(KanalNummer) 
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Handhabung der Prozeßperipherie mit MSRBASIC-Sprachmittel 
Im Interpreter Direkt-Modus liefert bzw. setzt/gibt: 


PRINT ADC(1) -» normierte Real-Zahl des analogen Eingangskanals 1 
PRINT DIN(4) -> den Wert O oder 1 des Binärkanals 4 

PRINT GET(8) -> den Zustand des CPU-I/O-Ports 8 

PRINT CNT(2) -» den Záhlerstand eines 16 Bit Zàhlerkanals 2 


` 


DAC(15) = 6.5 den analogen Ausgangskanal 15 auf Full-Scale / 2 - 
DOUT(2) = 1. den Binärkanal 2 auf den log. Wert 1 

PUT(12) = 128 an dem CPU-I/O-Port 12 die Zahl 128 aus 

CMTCS) x 200 den Zählerkanal 3 auf den Zählerstand 200 


Die Anschlüsse dieser MSRBASIC-Sprachmittel an die reale Hard- 
ware des Ablaufrechners ist Aufgabe der jeweiligen Implementa- 
tion. Über die Funktionen NADC, NDAC, NDIN, NDOUT und NCNT kann 
man sich auf jedem MSRBASIC-System Aufschluß über die Anzahl der 


Prozeßperipherie-Kanäle verschaffen. 


Die Leistungsfähigkeit der MSRBASIC-Prozeßzugriffsfunktionen läßt 
sich an einem kleinem Beispiel demonstrieren. Es soll eine Pumpe 
in Abhängigkeit der Schalter S1, S2, S3 und S4 geschaltet werden. 
Der funktionelle Zusammenghang sei durch folgende Boolsche Glei- 


chung beschrieben: 
Pumpe = S1 * (S2 + /S3 + S4) TA 
Abbildung in einem MSRBASIC-Programm: 


10 REM Pumpe wird durch den digitalen Ausgangskanal 5 geschaltet 
20 REM | 

SO Pumpe = S 

40 REM 

50 REM Die Schalterstellungen werden über digit. Eingangskanäle 
60 REM 1...4 eingelesen 

70 REM | | 

80 Sl = 1: S2 = 2 :S3 = 3:94 = 4 

90 REM | 
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100 DOUT(Pumpe) = DIN(S1) κ (DIN(S2) + NOT(DIN(S3)) + DIN(S4)) 
Die Zeilen 10 bis 90 des vorstehenden Beispiels bereiten nur die 
Umsetzung der Boolschen Gleichung in Zeile 100 vor und steigern 
die Lesbarkeit dieser Zeile. Die Nàhe der programmtechnischen 


Realisation zur Problemstellung ist offensichtlich. 


Zum Abschluß der Betrachtung MSRBASIC und die Prozeßperipherie 
noch ein Blick auf die vektoriellen Einlese- und Ausgabefunktio- 


nen. Hierfür stellt MSRBASIC folgende Funktionen zur Verfügung: 
MADC( ), MDAC( ), MDIN( ) und MDOUT( ) 


Argumente dieser vektoriellen E/A-Funktionen sind vereinbarte 
Vektoren, die Meß- oder Stellortvektoren genannt werden. Kleines 


Beispiel mal ohne REMarks: 


10 ΝΞΙΟ 
20 DIM IN(N), MO(N), OUT(N), SO(N) 
30 ΝΕΟ IN = MADC(MO) , MDAC(SO) = OUT 


1000 END 


Vektoren werden wie eindimensionale Felder vereinbart. Ihren vek- 
toriellen Charakter erhalten sie erst im Zusammenhang mit den 
vektoriellen Operationen. In Zeile 3O des Programmbeispiels 
werden durch das Schlüsselwort VEC und den Funktionen MADC( ) 


bzw. MDAC( ) folgende Einzel-Operationen ausgelöst: 


IN(i)zADC(1), IN(2)sADCT(2), ... IN(N-1)=ADC(N-1), IN(N)=ADC(N) 
und 
DAC(1)-OUT(1), DAC(2)-QOUT(2),... DAC(N-1)zOUT(N-1),DAC(n)-zOUT(N) 


Ist doch ganz nett was man durch eine einzige MSRBASIC-Anweisung 
alles auslósen kann. Nun mal schnell zu den parametrierbaren Reg- 
lerfunktionsblöcken. 


MSRBASIC und PI- bzw. PID-Regler 


wie schon fast erwartet erledigt MSRBASIC auch diese Kleinigkeit 
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mit fast einer Zeile. Die Reglerfunktionen PI( ), PID( ), GPI( ) 
und GPID( ) werden mit der momentanen Regeldifferenz E als Ein- 
gangsgröße sowie mit den Reglerparameter Kp, Ki, (Kd), Yo, Yu und 
Yd aufgerufen und reichen eine Stellgröße Y heraus. Für die Zu- 
standsgrößen sind max. noch drei Variable bereitzustellen, was 
aber in einem BASIC-Interpreter kein Problem darstellt. Ein 


schnell programmierter Regler kónnte wie folgt aussehen: 


100 E = SOLL - ADC(IST) 
110 DAC(Stell) = PID(Y,E,El,E2,Kp,Kd,Ki,Yo,Yu,Yd,AK) 
120 GOTO 100 


Die detailierte Beschreibung der Reglerfunktionsblöcke entnehmen 
Sie bitte dem MSRBASIC-Handbuch. Auch die Reglerfunktionen können 
vektorisiert verwendet werden; sollte man auch tun wenn man meh- 


rere Regler benötigt (erhöht die Ausführungsgeschwindigkeit). 


MSRBASIC besitzt noch eine ganze Menge beschreibenswerter Fáhig- 
keiten, (so die Vektor-/Matrix-Arithmetik, die Ansprache der se- 
riellen Datenkanäle über log. Nummer - PRINT ON(3) -, Status und 
Kommandofunktionen für die seriellen Schnittstellen, je nach Im- 
plementation auch Kommunikationsfunktionen zum Vernetzen von 
MSRBASIC-Rechnern u.a.m.) die aber an dieser Stelle nicht mehr 
beschrieben werden sollen. Nachfolgend soll nun das Verhältnis 
des "endgültigen Z80-EMUF" zum MSRBASIC beschrieben werden. 


Der "endgültige Z80-EMUF" und MSRBASIC 


Die drei Speichersockel (U1, U2 und U3) des "endgültigen Z80- 
EMUF's" werden unter MSRBASIC wie folgt benutzt: 
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Speicherlayout 


Standardlayout 
Ul OOOOH ... O7FFH -> EPROM 2706256 
U2 8000H ... FFFFH -> SRAM gepuffert 62256 JPS offen 


Speicherlayout 1 - EPROM auf Uš 


ul OOOOH ... O7FFH -> EPROM 276256 
U2 8000H ... BFFFH -> SRAM gepuffert 62256 JP5 geschlossen 
Uš COOUH .., FFFFMH -» EPROM 27C256 


Speicherlayout 2 - EEPROM auf Uš 


Ul ου ... Q7FFH => EPROM a7 296 
U2 8000H ... BFFFH -» SRAM gepuffert 62256 JP5 geschlossen 
US COQOH ... DFFFH -» EEPROM 2864 

«ns -EFEFR =>. EEPROM 28256 


Im Standardspeicherlayout residieren das Monitorprogramm (be- 
schrieben in MC ****) und der MSRBASIC-Interpreter im EPROM, ei- 
nem 27C256 auf Speichersockel Ul. Als Arbeitsspeicher stehen den 
beiden Programmen ein SRAM 62256 im Speichersockel U2 akkugepuf- 
fert zur Verfügung. Aus dem MSRBASIC gelangt man mit dem Kommando 
SYST in den Monitor, aus dem Monitor mit dem Kommando B zurück 
ins MSRBASIC. Die Datenbereiche beider Programme sind getrennt, 
sodaß man unproblematisch hin und her springen kann. Benutzt man 
das Standardspeicherlayout stehen rund 29 KByte BA-SIC-RAM-Be- 


reich zur Verfügung, der zudem noch akkugepuffert ist. 


Das Speicherlayout 1 - EPROM auf Uš 


Im Unterschied zum Standardspeicherlayout stehen hier nur.die un- 
teren 16 KByte des 62256 (U2) zur Verfügung. Der Jumper JP5 ist 
zu schließen, damit die Adreßdekodierung die obersten 16 KByte 
(COOOH...FFFFH) dem Speichersockel U3 zuordnet. Dann sind für den 
EPROM-Einsatz auf Sockel U3 noch folgende Modifikationen vorzu- 
nehmen: JP2 öfnen, Signalleitung /WR von PIN27-US3 entfernen, 
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PIN27-U3 (A414) mit Masse und PIN1-U3 mit +5V verbinden. Sinn und 
Zweck des Speicherlayouts 1 siehe MSRBASIC Autostart. Bei diesem 
Speicherlayout stehen rund 12,5 KByte BASIC-RAM-Bereich zur Ver- 
fügung. 


Das Speicherlayout 2 - EEPROM auf Uš 


Speicherlayout 2 entspricht dem Speicherlayout 1 mit dem 
Unterschied, daß eine Hardwaremodifikation nicht erforderlich 
ist. Jumper JP5 ist zu schließen (s. Speicherlayout 1). MSRBASIC 
unterstützt in diesem Speicherlayout den Einsatz von EEPROM’s der 


Typen 2864 und 28256 (bei den 28256 werden nur 16 KByte benutzt). 


MSRBASIC Autostart 


MSRBASIC ist autostartfähig und benutzt in dieser Implementation 


folgende Mechanismen: 


a) P - Autostartmodus : Bei einem Kaltstart ( Versorgungsspan- 
nung ein) überprüft MSRBASIC, ob in seinem BASIC-RAM-Spei- 
cher ein BASIC-Programm steht. Ist das der Fall, schaltet 
MSRBASIC den FREEZE-Modus ein und exekutiert das Programm. 
Da beim "endgültigen Z80-EMUF" der RAM-Sockel U2 gepuffert 
ist, bietet der P-Autostartmodus eine einfache Möglichkeit 
einen Autostartbetrieb zu realisieren. Für diesen Einsatz- 
fall ist das Standardspeicherlayout vorgesehen, das einen 
BASIC-RAM-Bereich von 29 KByte zur Verfügung stellt. 


b) L - Autostartmodus : Dieser load-and-go-Modus wird dann ak- 
tiv, wenn kein BASIC-Programm im BASIC-RAM gefunden wird. 
Über einen vereinbarten seriellen Kanal erwartet MSRBASIC 
die Eingabe eines BASIC-Programmes. Hier sind nun zwei Mög- 


lichkeiten implementiert: 


L - EPROM : Sie benutzen das Speicherlayout 1, schreiben mit 
einem ASCII-Editor ein MSRBASIC-Programm, wobei Sie nur dar- 
auf achten, daß die Einer-Stelle der Programmzeilennummer in 
Spalte 6 steht (z.B. 10 PRINT TEST als: ----10 PRINT TEST, 
wobei die underline-Zeichen in diesem Beispiel für blank- 


Zeichen stehen). Am Ende des so erstellten Programmes fügen 


m 
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Sie ein ^T (14H) ein und schreiben diese Datei in ein EPROM 
vom Typ 27C256. Dieses EPROM stecken Sie in den Sockel US, 
schalten die Versorgungsspannung des "endgültigen Z80- 


EMUF's" ein und schon wird das Programm exekutiert. 


L - EEPROM : Sie benutzen das Speicherlayout 2, erstellen 
mit dem MSRBASIC-Editor ein Programm und geben das Kommando: 
SAVE ON(2) ein. Ein evtl. im EEPROM stehendes Programm wird 
Ihnen angezeigt. Geben Sie nun das Zeichen ^A (O1H) ein, 
wird das im BASIC-RAM stehende Programm im EEPROM abgespei- 
chert. Soll ein Übertschreiben des EEPROM-Programmes verhin- 
dert werden, brechen Sie mit ^C (O3H) das SAVE ON(2)-Komman- 
do ab. Beim Einsatz eines EEPROM's vom Typ 2864 kónnen Sie 
so max. 7 KByte lange Programme im EEPROM speichern, verwen- 
den Sie ein 28256 läßt sich der ganze verwaltete BASIC-RAM- 


Bereich im EEPROM sichern. 


Für beide L - Autostartmodi gilt: Ist ein BASIC-Programm im 
BASIC-RAM-Bereich, dann wird das nach POWER-ON exekutiert. 
Befindet sich kein Programm im BASIC-RAM-Bereich, wird ver- 
sucht aus dem E(E)PROM ein Programm in den BASIC-RAM-Bereich 
zu kopieren, das dann daraus exekutiert wird. Findet MSRBA- 
SIC weder im BASIC-RAM-Bereich noch im E(E)PROM-Bereich ein 


Programm, startet der Interpreter im Kaltstart-Modus. 


übersicht MSRBASIC-Implementation "endgültiger Z80-EMUF'" 


Serielle-Kanäle : SIO-A LUzO Konsolenkanal, TVI 925 
: SIO-B LU-1 
Parameter 9600,8,2,NO 


: beide Kanale interruptgesteuert 


: E(E)PROM LU-2 SAVE ON(2) 
: LOAD ON(2) 
LIST on(2) 


Programmspeicherung 


: EEPROM LU-3 PRINT ON(3) 
INPUT ON(3) 


: Datenspeicherung max. 1 KByte 
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Prozeß-Kanäle 


Hardware-Uhr 


Schnittstellen 


Ser. 


Abschließend möchte ic 
MSRBASIC nicht nur auf 


auch auf CPM-Rechnern und auf DOS-Rechnern, 


SHELL gibt (Terminal, 


Seite 14 
PIO-A DIN(1...8) 
PIO-B DOUT(1...8) 
PRINT time$, date$ , dow$ 
now$ = time$ heute$ = date$ Tag$ = dow$ 
RTC lesen 
times = "12:12:12" date$ = "31.03.1989" 
dow$ = "FRI" 


RTC schreiben 


pUTC15 5 = I8 

PUT(15) = 12 -> Test-Modus der Uhr 
PUT(15) = 15 

PUT(15) = 4 -> Normalbetrieb der Uhr 
Vorausetzungen 


IF232 Brücke PIN 1 mit PIN & 

oder Terminal muß DCD setzen 
Beide Kanäle Hardwarehandshake RTS/CTS 
Kanal B zusätzlich XON/XOFF 


h nicht versäumen Ihnen mitzuteilen, daß 
dem "endgültigen Z80-EMUF' 


daß es eine MSRBASIC- 


lauft sonder 


Editor und up-/download) und es reichlich 


Prozeßperipherie für den "endgültigen Z80-EMUF'" geben wird, die 
einfach über MSRBASIC gehandhabt werden kann. 


Autor: Hans Metzmacher 


Joh.-Seb.-Bach-Str. 13 


4920 Lemgo 
Tel. 


05261-12754 
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Anpassung der MSRBASIC-Konfiguration: 


Verwalteter RAM-Bereich  16KByte -> Adresse 100BH Inhalt BFBFH 
32KByte -> 100BH FFBFH 


Achtung: LSB vor MSB 
CTC-Kanale 2 und 3 Bauderateeinstellung 


N CTC2 SIO-A Adresse 11768H Inhalt O4H -> 9600 bps 
08Η -> 4800 bps 
10H -> 2400 bps 
20H => 1200 bps... SIO /16 


CTC3 SIO-B Adresse 1182H Inhalt O4H -> 9600 bps 
08H -> 4800 bps 
1OH -» 2400 bps 
20H -> 12600 bes... 510 /16 


SIO-Initialisierung Ab Adresse 1A43H befindet sich folgende 
Tabelle im EPROM: 


ze mm — ϱ  . "mmm — mmm ϱ emm mn vm mmm emm emm om 


; SIO-INITAB bei Interruptbetrieb 


" — — — — — — — — — — mmm — mm — κ — — — — — — — mm — — em — — mmm mm — = 


A SIOTAB: DB X’38’ * RETI 
DB x’ı8’ * ;CHANNELRESET 
DB X'o4' * ;WRITE REG 4 
DB Ae "ah :4CH -> /16, 2 stop, no par. 
DB x’0o5’ * ;WRITE REG 5 
CMOS- DB X' EA’ :ΕΑΗ -> dtr, transmit 8 bit, 
tx enable, rts 
DB X703? * ;WRITE REG A 
DB X'E1' ΣΕΙΗ -> receive 8 bit, auto, 
Š rx enable 
DB χΧ”οι * ;WRITE REG 1 
x DB X'1i8' κ ;INT ON EVERY Rx 


ο. ο. i EE 
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DB κ οὐ” x ;INT ENABLE 


nn om zm zm Ὁ ΘΓ ΘΝ ΝΞ. 


Die mit * gekennzeichne:an Stellen dürfen unter keinen Umständen 


geändert werden. 


Lemgo, im April 1989 


2. ALLGEMEINES 
2.1 SINN UNO ZWECK VON MSR-BASIC 
Der MSR-8ASIC-Interpreter ist konzipiert für die flexible Implementierung 


von Meß-, Steuer- und Regelalgorithmen auf Mikrorechnern der Z80- oder 
der 8086-Familie (stand-alone-Systeme, CP/M-Personal-Computer u.a.). 


δ------------------------- + 

$e >! AOC NER-BASTCH —DAC l< sss s = 9 
| eR »! DIN Rechner p0uT sto» $ed 
l Me KEE ae E Es: 
38 ΙΝ. — I. + Ej 
1 f I! Ec: 
I. Εγῆ Eod 
T L 4 ker? 
! ! ! —— - -- -- --- -- = - + Γι 
τα tasas Technischer παλ κα. 
l. oe : Prozeß L <= = s= ser + 
φρ-------- ! I 

| Φ------------------------- + 


Schaubild 2-1: Universelle MSR-8ASIC-Anwendungskonfiguration 


Er bietet daher für dieses Einsatzgebiet neben dem üblichen algorithmisch 
logischen Kern einer höheren Programmiersprache spezielle Sprachmittel 
an, die die Formulierung von 


- nebenläufigen Programmen (Multitasking), 
- hardwareunabhangigen Prozeüzugriffen, 

- Zeıtgebern, 

- PI(D)-Reglerfunktıionen, 

- Matrix-Vektor-Operatıonen 

- Kommunikationsfunktionen 


erlauben. 


Neben diesen sprachlichen Fähigkeiten, die MSRBASIC als echte Realzeit- 
sprache ausweisen, verfügt der MSRBASIC-Interpreter (im Sinne eines Pro- 
grammiersystems) über eine Reihe von Eigenschaften, die nıcht nur die Er- 
stellung, sondern auch Fehlersuche, Wartung und (Re-)Dokumentation von 
MSR-Anwenderprogrammen unterstützen: 


- Integrität von Ziel- und Entwicklungssystam 

- integrierter serieller Hostrechneranschlu8 (Programm laden, 
Daten versenden und entgegennehmen, Betrieb als intelligentes 
Terminal, LAN-Betrieb) 

- strukturorientiertes Programm-Ausdrucken 

- Befehlsanzeige vor Ausführung zum Programmtest (TRACE-Mode) 

- Anzeige des momentanen Programmzeigerstandes bei SEQuenzen 
(Aufspüren von Deadlocksituatıonen) 

- Fehlermeldung mit Quellzsilen-Auslisten 

- E/A-Simulator-Betriebsart 
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Weitere für Realzeit-Mikrorechner notwendige Eigenschaften sind 


- Rechengeschwindigkeitssteigerung durch Einsatz eines Arith- 
metik-Coprozessors (8087, 8231/9511) 

- EPROM-fähiger Zwischencode 

- Autoload- und -startfunktion 


Für den MSRBASIC-Interpreter ergibt sich damit ein breites Einsatz- 
spektrum: 


- Einsatz in autonomen Regel- und Steuergeräten, insbesondere 
bei verfahrenstechnischen Anwendungen 

- Einsatz als Controller zusammen mit intelligenten Periphe- 
riegeräten zur Experimentstsuerung 

- Einsatz bei Maschinensteuerungen 

- Einsatz als Meßwerterfassungs- und Protokollierungssystem 

- Einsatz zur Ausbildung 


Die Summe dieser Eigenschaften machen ihn zu einem Instrument, das für 
viele Anwender (Steuerungs- und Regelungstechniker,  Verfahrenstechniker, 
Chemiker, Physiker, Mediziner u.a.) eine wertvolle Hilfe darstellt. 


Das vorliegende Handbuch will in kenzentrierter, aber hinreichend 
ausführlicher Form den Anwender bei der Handhabung des MSRBASIC-Interpre- 
ters unterstützen. 


Es setzt eine gewisse Vertrautheit mit der Grundsprache BASIC voraus und 


legt daher das Hauptgewicht auf die Behandlung der  echtzeitspezifischen 
Fähigkeiten von MSRBASIC. 
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2.2 ANWEISUNGEN, DATENTYPEN und SONSTIGES 

[n diesem Kapitel werden zunächst - im Sinne einer Übersicht - in alpha- 
betischer Ordnung kurz einige allgemeine MSRBASIC-Eigenschaftan behan- 
delt, bevor im zweiten Teil ausführlich das MSR-BASIC-Echtzeitkonzept 
erlautert wird. 


2.2.1 ANWEISUNGEN 


Ein MSR-BASIC-Programm besteht aus einer eindeutigen Folge von Anwel- 


sungen (Statements). Jede Programm-Anweisung beginnt mit einer Zeilen: 
nummer (1...32766), die die Lage der Zeile innerhalb des Programms fest- 
legt. 


Einige Anweisungen können auch direkt ("direct mode’), d.h. quasi als 
Kommando eingegeben werden. 


Diese Eigenschaft ist insbesondere beim Echtzeitbetrieo von großer Be- 
deutung, da während der Programmausführung auf alle Variablen mit Hilfe 
von PRINT- und (LET-)Anweisungen zugegriffen werden kann. 


2.2.2 BUCHSTABEN 


MSR-BASIC läßt die Verwendung von Klein- und Großbuchstaben zu. Bei 


Schlüsselwörtern (Kommandos, Anweisungen, Funktionen, Trennwörtern und 
Systemvariablen) werden Kleinbuchstaben bei der Eingabe in Großbuchsta- 
ben umgewandelt. 9.h. Eingaben wie "THEN", “then” oder "Then" werden 


intern als "THEN" behandelt. 


Dagegen werden Kleinbuchstaben in Variablennamen NICHT wıe Großbuchstaben 
behandelt, d.h. 


ZEITS 
und sind zwei unterschiedliche Variable! 
Zeit$ 
2.2.3 DATENTYPEN 


MSRBASIC kennt die Datentypen REAL und STRING. Integer-Zahlen werden 
intern als Gleitkommagrößen behandelt. Der Datentyp ergibt sich implizit 
aus dem Programm. 


2.2.6 DATENSTRUKTUREN 


Als Datenstrukturen sind ein- oder zweidimensionale Felder (s.d.) vom Typ 
REAL oder STRING moglich. 


2.2.5 EDITOR 

Bei der Engabe eines Kommandos, einer Programmzeile oder eines Wertes 
(Zahl oder Text) ist ein Zeileneditor wirksam, d.h. daß innerhalb der 
laufenden Eingabezeile der Kursor bewegt, Zeichen eingefügt und gelöscht 


werden können. 


Einzelheiten siehe Kapitel "Editor’: 
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2.2.6 FELDER 


Es können ein- und zweidimensionale Felder für die Datentypen REAL 
STRING benutzt werden. Der Index beginnt grundsätzlich bei 1. Sofern der 
verfügbare Anwenderspeicher es zuläßt, können numerische Vektoren bıs zur 
Dimension 8191 und Matrizen bis zur Ordnung 126x126 vereinbart 
Stringfelder können maximal 255 Elemente aufweisen. 


und 


werden. 


2.2.7 FUNKTIONEN 


Neben den BASIC-Standardfunktionen wie SIN, SQR bzw. CHRS, MIDS usw. 


werden folgende Typen von anwendungsbezogenen Funktionen zur Verfügung 
gestellt: 


Auf- und Abwärts-Zeitgeber 

Zugriffe auf analoge und digitale Prozeó&peripherie 
Komplette Reglerbloócke (PI, PID) 

Status- und Kommandofunktionen für die seriellen Kanala 
Kcmmunikationsfunktionen 


-* e ἡ ἈΝ 


2.2.8 KANALNUMMERN 


Für Befehle mit “ὋΝ (...)"-Zweig erfolgt E/A auf die der Kanalnummer 
entsprechende Schnittstelle: 


logısche Belegung 


Kanalnummer ! unter  CP/M ! unter PC-00S 
-------------- Φ-----5--------------------------φρ--------------------------ο 
0 I CON-Schnittstelle ! ΕΟΝ: -Einheit ! 
1 ! LST-Schnittstelle | LPT:-Einheit ! 
2 i AUX-Schnittstelle (CPM 3.0) ! COM1:-Schnittstelle |! 
3-9 ! (konfigurationsabhg.) | 
10-xx ! Dater-Kanàale I 10-19 Dateikanile | 


Die freien seriellen Kanäle können nicht nur zum Anschluß von Standardpe- 
ripherie genutzt werden, sondern eignen sich vorzüglich zur Anbindung 
komplexerer Schnittstellen wie z.B. IEC-8us oder von DFU-Kanälen. 

Details siehe Installationsanleitung für serielle Kanale. 


2.2.9 KOMMANDOS 


Die Kommandos im MSRBASIC dienen entweder Editierzwecken (LIST, SAVE, 
LOAD, NEW) oder Festlegung der Betriebsart (RUN, FREEZE, SYS). 


2.2.10 KOMMENTARE 


Kommentare werden durch REM-Anweisungen gekennzeichnet. 
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2.2.11 OPERATOREN 


Skalare Operatoren 


a) Rechenoperatoren 


Wertigkeit 

Potenzoperator : ` 3 

Multiplikation : £ 2 

Division t / 2 

Addition E. 1 

Subtraktion e 1 
b) Vergleichsoperatoren 

größer . ὁ 

kləiner °. < 

gleich + 8 

groB8er-gleich : = > oder > = 

kleiner-gleich : = < oder < s 

ungleich : < > oder > < 
C) Stringoperationen 

Verkettung Po 

Matrix-Operatoren 
Wertigkeit 

Multiplikation : * 2 

Element-Multipl.: 2 

Addition ` e 1 

Subtraktion : - 1 


2.2.12 PROGRAMM 


MSRBASIC kennt drei Typen von Programmen: Das Hintergrundprogramm  ent- 
spricht dem üblichen BASIC-Programm. Es wird über das RUN-Kommando oder 
einen unmittelbaren GOTO-Befehl gestartet. Die Beendigung des Programms 
erfolgt über die entsprechenden Anweisungen (RETURN, STOP, ENO), über 
Fehlermeldungen oder durch ein Abbruch-Kommando vom Terminal aus (Eingabe 
von “Ctrl-C” bzw. "Ctrl-P^ bei MSR-BASIC-Slave-Rechnern). 


Der zweite MSRBASIC-Programmtyp heißt “TASK” und wird zyklisch vom Echt- 
zeitbetriebssystem gestartet (s. nächsten Abschnitt). Sollen alle zykli- 
sche Programme nicht mehr gestartet werden, ist ^"Ctrl-0^ (bzw. "Ctrl-T^) 
einzugeben. 


Der dritte MSR-BASIC-Programmtyp ist die "SEQuenz^. Auch sie wird vom 
Echtzeitbetriebssystem gestartet (s.u.). Das Anhalten aller SEQuenzen ge- 
schieht durch die Eingabe von "Ctrl-A" (bzw. ^Ctrl-R"). 
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2.2.13 STARTEN DES INTERPRETERS 
Start unter MS-00S odar CP/M 


Der Interpreter wird unter CP/M als MSRxxx.COM-Datai geliefert und unter 
MS-00S als MSRxxx.EXE-Datei. 


Start MS-DOS oder CP/M (ohne Programm-Laden): 
A»MSRxxx 
Danach meldet sich der MSR-BASIC-Interpreter mit: 


MSRBASIC vom xx.xx.198x 
Warm- oder Kaltstart (W/K) ? 


Sofern im BASIC-Programmspeicher ein intaktes Programm vorhanden ist, w 
führt MSR-BASIC automatisch einen Auto-Warmstart durch, d.n. die 
Anwendervariablen werden nicht yelüöscht, das Programm wird an der ersten 
Zeile ausgeführt. 


Hinweis; Die hierbei oft nicht erwünschte anwenderseitige Neuinitiali- 
sierung von Parameterwerten durch folgende Anweisungsfolge 
verhindern: 


IF IniFflg=0 then GOSUB «VarInit» 
[IniFl1g:! 


zeitbetriebssytems und des Arbeitsspeichers, sowie eine konfigurationsab- 
hängige  Kalt-Initalisierung der Proze8-E/A. In der Regel bedeutet dies 
z.8. für die binären Stellsignale ein Schalten in den stromlosen Zustand. 


Bei Warmstart wird die Echtzeituhr initialisiert und das ACTIVE-Bit aller 
TASKS und SEQuenzen zurückgesetzt, um einen definierten Neu- bzw. Wieder- 
start zu gewährleisten. Außerdem wird eine konfigurationsabhángige Warm- 
Initialisierung der Proze8-E/A vorgenommen. Dies bedeutet z.8. für die 
pinaren Stellsignale, daß die E/A-Bausteine in Ausgaberichtung neu pro- 
grammiert werden. 


Bel Kaltstart erfolgt eine Initialisierung der Echtzeituhr, des  Echt- 

I 
Start unter MS-00S oder CP/M mit Programm-Laden j 
Beim Aufruf "MSRBAS <Programm-Name>" wird nach dem Erscheinen der MSR- 
BASIC-Startmeldung das Programm <Programm-Name.BAS> von Diskette geladen 
(Anzeige “L `) und sofort ausgeführt. 


| 
stand-alone-Start | 


In einer stand-alone-Konfiguration gibt es noch zwei weitere  Startvari- | 
anten, nämlich den Autostart eines in EPROM abgelegten Anwenderprogramms 
(Eingabe von P) bzw. das automatische Laden eines Programms von einem 
voreinstellbaren seriellen Kanal und anschließende Starten (Eingabe von 
"STE, 
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2.2.1& TRANSPARENT-BETRIEB (VIRTUELLES TERMINAL) 


MSR-BASIC unterstützt im Rahmen der SAVE-, LOAD- und LIST-Kommandos den 
Datenverkehr von und zu einem zweiten Rechner (Gastrechner). Bei Aus- 
führung dieser Kommandos geht der Interpreter vorübergehend in den Trans- 
parent-Betrieb, d.h. es wird die uneingeschränkte Verbindung zwischen dem 
Benutzer und dem Gastrechner aufgebaut. Erst die Eingaoe eines speziellen 
Fluchtsymbols ( A bzw. R) veranla8t die Ausführung des Kommandos (s. 
LOAD-Kommando). 


2.2.15 VARIABLE 


Ein MSRBASIC-Programm kann maximal 255 verschiedene Variable aufweisen. 
Es gibt vier Arten von Variablen, nämlich Skalare und Felder jeweils vom 
Datentyp "REAL" oder "STRING". 


Jede Variable besitzt einen Namen, der maximal sechs Zeichen aufweist. 
Das erste Zeichen ist immer ein Buchstabe. Als folgende Zeichen sind 
Ziffern, Buchstaben und der Unterstrich ^ " erlaubt. Außerdem sind aus 
Gründen der Kompatibiltät zu Microsoft-BASIC die Zeichen ^1" und "E 
zugelassen. 


Zeichenkettenvariable (Stringvariable) sind durch ein "$"-Zeichen zusätz- 
lıch zum Variablennamen gekennzeichnet. 


Beispiele: A min, A0Z, Azeich(2), ESC$, X$(1,2) 


Die maximale Länge von Stringvariablen wird bei der MSRBASIC-Konfigu- 
rıerung festgelegt (Voreinstellung: 40 Zeichen). Stringfelder weisen als 


Elemente Stringvariable auf. Die Namen der Wochentage können z.B. in ein 
Stringfeld abgespeichert werden: 


DIM WOS(7) 
w0$(1)27"Montag^ 


2.2.18 ZAHLENBEREICH 


Die größte Zahl, die vom Interpreter verarbeitet wird, ist 4.61168E+18, 
die kleinste 6.46235E-27. Tritt bei einer arithmetischen Operation ein 
Uberlauf auf, erfolgt eine Fehlermeldung. Dagegen wird bei einem Unter- 
lauf das Ergebnis automatisch zu null gesetzt. Es können I[nteger-, Fest- 
komma- und Gleitkommazahlen mit und ohne Exponenten eingegeben werden. Es 
dürfen nicht mehr als sieben Stellen eingegeben werden. 
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3. EDITOR-FUNKTIONEN 


3.1 ÜBERSICHT 


In MSR-BASIC stehen bei der EingaSe von Prosrammzeilən komfortable, 
WordStar(R)-orientierte Editorfunktionen zur Verfügung. 


Eine weitere Komfortsteigerung bringt die erweiterte Syntaxprüfung bei 
der Programmzeilen-Eingabe, die nunmehr fenlende Klammern oder  Anfüh- 
rungszeichen sofort entdeckt. Damit werden MSR-BASIC-Programme  aucn 
sicherer, da syntaxbedingte Laufzeitfenler verringert werden. 


3.2 FUNKTIONSBESCHREIBUNG 


Bei der Eingabe einer Programmzeile (oder von INPUT aus) ist grundsätz- 
lich der "Einfüge-Modus” in Kraft. Folgende Editierfunktionen stehen zur 
Verfügung: : 


Taste ' i Funktion 
BS (Ξ Η) Cursor eine Position näch links 
TAB {= I) Cursor eine Position nach rechts 


I 
I 
DEL L Zeichen links vom Cursor löschen 
"G | Cursor-Zeichen löschen 
I 
I 
N 


x ganze Zeile löschen 
CR Eingabe beenden (unabhängig von Cursor-Position! 
`C (bzw. `P) Eingabe abbrechen 


Alle anderen Steuerzeichen werden ignoriert. 


Beispiel I: Fehlende "Klammer zu ` einfügen 
(`_° = Cursorposition) 
I Fenler 
V 
Ausgangssituation: 1210 x1 = x2*(OIN(NOTAus * Hand) 


1. Cursor mit 8S auf Fehlerposition fahren: 
1210 x1 = x2*(0IN(NOTAus, * Hand) 


2. Klammer einsetzen: 
1210 x1 = x2*(0IN(NOTAus), * Hand) 


J. Zeile abschicken (CR eingeben) 
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3.3 ÄNDERUNG VORHANDENER PROGRAMMZEILEN 


Um bereits vorhandene Programmzeilen mit Hilfe der beschriebenen Editor- 
funktıonen zu ändern, ist dıe Zeıle aurch 


"E <Zeılennummer>” 
bzw. "SAVE <Zeilennummer>” 
bzw. "LIST «Zeilennummer»" 


anzuwahlen. 


Hierbei wird die angewáhlte Zeile ausgelistet, der Cursor bleibt jedoch 
am Ende der Zeile stehen. Daraufhin kann mit BS der Cursor nach links zur 
fehlerhaften Stelle bewegt werden. 


Beispiel 2: wie oben 


- em om — — — mm — — — — 


Ausgangssituation wird mit “ἃ 1210" (=SAVE 1210) hergestellt: 
(^ " = Cursorposition) 


1210 x1 = x2*(0IN(NOTAus » Hand) 
Danach Schritte 1...3 wie oben! 


Nach Abschluß der Bearbeitung der laufenden Zeile zeigt das LIST-Kommando 
in dieser Betriebsart die nächste Zeile in der gleichen Weise an. Durch 
die Eingabe von CR oder Leerzeichen wird die Anzeige ohne Veranderung der 
aktuellen Zeile weitargeschaltet. 


Weitere Hinweise 


zm mg < nn < zm mp mm em -- ep -- 


Syntaxfehler: Werden bei der Programmeingabe Syntaxfenler erkannt, wird 
die fehlerhafte Zeile nach der Fehlermeldung "Syntax- 
Error” automatisch im Editiermodus zur Fehlerkorrektur 
angebotan. 


FREEZE-Betrieb: Im Echtzeitbetrieb sind die Editiermoglichkeiten über das 
LIST-Kommando unterbunden. 
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4. ECHTZEITSPEZIFISCHE SPRACHMITTEL 


4.1 ÜBERSICHT 


Um die Echtzeitmöglichkeiten von MSR-BASIC angemessen einsetzen zu kön- 
nen, ist es neben der Kenntnis der Einzelbefehle vor allem notwendig, 
sich mit dem im folgenden beschriebenen Grundkonzept vertraut Zu machen. 


6.1.1 MSR-BASIC-ECHTZEITKONZEPT 


Die MSR-BASIC-Echtzeit-Philosophie wird deutlich, wenn man Automatisie- 
rungsaufgaben bei industriellen Prozessen hinsichtlich ihres Zeitverhal- 
tens unterteilt. Im wesentlichen lassen sich hierbei zwei Grundtypen von 
Verarbeitungsfunktionen erkennen: 


1) immer oder zeitweise im Eingriff befindliche "zeit- w 
kontinuierliche’ Funktionen wie z.B. lineare Rege- 
lungen, Überwachung und Verriegelung, Filterung u.a.m., 


2) zeit- oder prozeßgeführte Ablaufsteuerungen, in denen 
sich ein ereignisdiskreter Prozeßablauf widerspiegelt. 


φρ--------------------------- 4-2 - - 20... 2... 0. ---------- + 
I kontinuierliche ! ereignisorientierte ! 
I MSR-Funktionen I MSR-Funktionen ! 
Φ--------------- Φ--------------------------- Φ----------υ--------------- + 
!geispiele ! Regelungen I Ablaufsteuerungen I 
! ! Überwachung-Verriegelung ! Batch-Prozesse ! 
! ! Filterung ! ! 
! 
φ--------------- φ--------------------------- φρ------------------------- » 
Igraghische ! Signalflußplan I Funktionsplan,Petri-Netz! 
IOarstellungs- | ! ! 
! form ! ! ! ! 
| I I Ες EEN | 
| | | ec | 
| I φ-------- + I φ----φϕφ--οφ-«ὲ ! 
I i xe l I Xa l I I I 
I l ur 1 Eat | Gah Seege + I 
! >! ! > ! ! ! 
! I! ! emi I | +--- f 
k. 3 Ι d 
I I Φ-------- + ! Φδ----ο--ς-φ I ` 
! | I I I i 
I ! Ι ee = Sa Se + 
d ! ! ! ! 
φ--------------- φ--------------------------- φ------------------------- * 
IMSR-BASIC I TASK ! SEQuenz 
Frogremetyg ! ! | 
! ! ! ! 
φ--------------- φ--------------------------- φ------------------------- + 


Schaubild 4-1: Einteilung der MSR-Funktionen 
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Diesem Dualismus trägt MSR-BASIC im Gegensatz zu vielen Realzeitsprachen 
durch das explizıte Bereitstellen von zwei nebenläufige Programmtypen 
Rechnung, nämlich "TASK" für zyklische Programme und "SEQuence’ für 
Ablaufsteuerungs-Programmteıle. 


Bei reinen Regelungsanwendungen werden nur TASKs verwendet, während z.B. 
Chargen-Prozesse die Koordination der Regelungsfunktionen durch  überge- 
ordnete Ablaufsteuerungen (SEQuenzen) erfordern. Andererseits sind reın 
ereignis-orientierte (Fertigungs-, Montage- u.a.) Prozesse durch paral- 
lela Abläufe gekennzeichnet, die sich durch verbale Spezifikationen, 
Petri-Netze oder Funktionspläne beschreiben und darstellen lassen. Diese 


Beschreibungsformen lassen sich sehr leicht in MSR-BASIC-SEQuenzen  ab- 
bılden. 


Die grundlegend unterschiedliche Aufgabenstellung von TASKs und SEQuenzen 
erklärt auch den unterschiedlichen internen Programmbearbeitungs-Modus: 
TASKs sollen periodisch gestartet und möglichst in einem Zug abgearbeitet 
werden, um ihrer quasikontinuierlichen Funktion gerecht zu werden. [deal 
ware für sie eine unendlich kurze Ausführungszeit. 


Dagegen hängt die Ausführungsgeschwindigkeit einer SEQuenz kaum von der 
Rechengeschwindigkeit des Prozessors, sondern vom Zustand des techni- 
schen Prozesses ab. 


Diese Abhängigkeit der Programmfortsetzung vom Prozeßzustand wird  allge- 
mein als "Weiterschaltbedingung' bezeichnet. 


Im folgenden Abschnitt wird summarisch erläutert, wie der Anwender die 
MSR-8ASIC-Echtzeitmittel handhabt. 


4.1.2 ORGANISATION UND HANDHABUNG DES ECHTZEITBETRIEBS 


In MSR-BASIC 4.0 kann der Anwender bis zu 5 zyklische Programme (TASKs) 
und bis zu 25 Ablaufsteuerungen (SEQuenzen) nebenläufig (quasıgleichzei- 
tig) betreiben. Hierzu stahen ihm neben der beschriebenen MAIT-Anweisung 
als Sprachmittel die Anweisungen DEFINE, START, ACTIVATE und SUSPEND 
(s.u.) zur Verfügung. Der Echtzeitrachenbetrieb ist nun durch folgende 
Eigenschaften gekennzeichnet: 


- TASKs werden als normale BASIC-Unterprogramme geschrieben und über 
die DEFINE-Anweisung durch Angaoe der Nummer (Priorität), des 
Aufruf-Zeitintervalls und der Startzeilennummer in die  Echtzeit- 
verwaltung integriert. 


- SEQuenzen werden ebenfalls als Unterprogramme geschrieben und 


durch Angabe der Nummer und der Startzeile in die Sequenzverwal- 
tung eingegliedert. 


- Die START bzw. ACTIVATE-Anweisung gibt die zyklische Bearbeitung 
von TASKs bzw. die einmalige Ausführung von SEQuenzen frei. 
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- Mit der SUSPEND-Anweisung können TASKs und SEQuenzen gezielt aus 
der Bearbeitung durch das Betriebssystem herausgenommen werden. 


- Höher priore TASKs können aktive Programme niederer Priorität 
(zTASKs, SEQuenzen, Hintergrundprogramm) unterbrechen, wobei das 
laufende Statement noch bearbeitet wird, um inkonsıstente Daten zu 
vermeiden. 


- Die Weiterschaltbedingung in Ablaufsteuerungen (SEQuenzen) wird 
mit Hilfe der WAlT-Anweisung formuliert. Die integrierte  Über- 
wachung der Wartezeit mit der Möglichkeit zur Ausnahmebehandlung 
ist ein sehr effizientes Mittel, um Fehler im technischen Prozeß 
zu erkennen und gezielt abzufangen. 


- Die Quasinebenläufigkeit der SEQuenzen orientiert sich an den ain- 
zelnen Schritten der Ablaufsteuerung. Dies bedeutet, daß eine SE- 
Quenz solange den Prozessor bekommt, bis sie auf ihr nächstes 
WAIT-Statement stößt, also einen Ablaufschritt ausgeführt nat, 
oder ein bestimmtes Rechenzeitintervall (10ms) verbraucht hat. 
Danach bekommt die nächste SEQuenz den Prozessor, bis alle SEQuen- 
zen auf die Erfüllung ihrer momentanen Weiterschaltbedingung war- 
ten. Diese werden vom Echtzeitbetriebssystem zyklisch unter Beach- 
tung der Priorität überprüft. 


- Werden keine Echtzeitprogramme ausgeführt, steht der MSR-BASIC- 
Interpreter für Hintergrundprogramme, Kommandos und direkta An- 
weisungen zur Verfügung. 


Da alle Variablen global gültig sind, kann 
der Benutzer auch ohne spezielles Kommunika- 
tionsprogramm während des Echtzeitbetriebs 
auf alle Variablen mit Hilfe der LET/PRINT- 
Anweisungen zugreifen! 


- Der Datenaustausch zwischen den Echtzaeitrechenprozessen geschieht 
ebenfalls über die global yültıgen Variablen. 


Damit sind alle Voraussetzungen für einen flexiblen Echtzeitbetrieb ær- 
füllt, wobei MSR-BASIC durch eine Reihe weiterer  realzeitorientierter 
Fehlersuch-Hilfen  (SEQLIST, TRACE SEQ, TRACE TASK) von vornherein eine 
hohe Transparenz gewährleistet. 
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4.1.3 BEISPIEL: "MESSWERTERFASSUNG” 


Als einfaches Beispiel soll eine typische Meßwerterfassungsaufgabe be- 
trachtet werden, bei der die Sprungantwort einer Regelstrecke aufgenom- 
men werden soll. 


δ--------------- + 
OACi1) ! MSR-BASIC- ! ADC(1) 
δ----- + Rechner (PC) +<----- + 
! ! ! 
| Σ--------------- + | 
! ! 
I ! 
! φρ--------------- + ! 
! ! REGELSTRECKE | 
DAC(1) +----)! I------ +-->) 
! ! 
ρ--------------- » 


Schaubild 4-2: Konfiguaration "Identifikation einer Regelstrecke^ 


Diese Aufgabe gliedert sich in mehrere Phasen: 


Phase 1: Initialisierung von Meßaufbau und Regelstrecke 
Phase 2: Aufnahme der Meßwerte 
Phase 3: Meßwertweiterverarbeitung (Filtern, Archivieren) 


Das im folgenden aufgelistete Programm "MESSDEM.BAS” zeigt eine moglche 
[Implementierung dieser Aufgabe. 


Der Initialisierungsteil (Zeilen 100...190) enthält als wesentlichen 
Teil die Deklaratıon der verwendeten Echtzeitprogramme (5ΕΩ!, TASKI) und 
startet SEQI. 


Das Meßwerterfassungs-Hauptprogramm weist genau dıe oben beschriebene 
Ablaufstruktur auf und wird deshalb als SEQuenz (Zeilen 1000ff) for- 
muliert. 


Entsprechend dem zweigleisigen MSR-8ASIC-Echtzeitkanzept ist es in der 
Phase 2 naheliegend, das zyklische Einlesen, Filtern (PT!) und Ablegen 
von Me8werten einer "TASK" zuzuordnen. 

Diese TASK wird zu Beginn der Phase 2 von der SEQuenz zur  zyklischen 
Bearbeitung freigegeben (ACTIVATE TASKI) und bei Erfüllung eines be- 


stimmten Kriteriums ("alle n Meüwerte eingelesen’) wieder gesperrt. 


In der letzten Phase werden die Meßwerte auf einer Datei abgespeichert. 
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&.1.& LISTING "MESSWERTERFASSUNG^ 


100 REM rees MESSOEM.BAS tree 


105 PRINT "Wieviele Messwerte’; 

110 INPUT N 

120 — DIM X(N),TOOWN(1) 

130 PRINT "Tastzeit TS in Sekunden‘; 

140 INPUT TS 

145 PRINT "Zeitkonstante des Vorfilters’; 
150 INPUT TF 

155 REM Filtertastrate ist um Faktor 10 groesser 
160 TSF=TS/10, AsEXP(-TSF/TF), B=1-A 

170 DEFINE TASK1,TSF,2000, SEQ1,1000 

180 START SEO) 


190 STOP Initialisierung 


1000 REM ***t*t* Sequenz 1 steuert das Experiment **tz* 
1010 REM Zunaechst Stellsignal O ausgeben 


1020 DAC(1)=0 

1040 WAIT 5 <=0 

1050 DAC(1)=1,NZ=N, [31, TOOWN( 1) :TSF 
1080 START TASKI 

1070 PRINT "Messung gestartet” 

1080 WAIT FOR NZ=0 

1090 SUSPENO TASKI 

1100 PRINT "Messung beendet” 

1110 PRINT "Auf welche Datei sollen die Messwerte 
1120 PRINT "abgespeichert werden `; 
1130 INPUT ΕΝ5 

1140 OPEN FNS,10,0 

1150 REM Abspeicherungsschleife 

1160 FOR I:1 TON 

1170 PRINT ON (10) X(I) AS 10Ε1 
1180 NEXT I 

1190 PRIMT "Experiment beendet" 


1200 RETURN Sequenz { 


2000 REM reese TASKI misst zyklisch den Streckenausgang ***** 
2010 X=A*X+B*A0C(1) 


2020 IF TDOWN(1)>0 THEN RETURN 
2040 TOOWN(1):TS 
2050 xX(1)=X,I=I+1,NZ=NZ-1 


2060 RETURN Task 
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4.2 ECHTZEITBEFEHLE 


&.2. t DEFINE 


Aufruf: 
------ + t-m... -v 5 
+-->! «ΖΝ» !--» +-->! DEFINE !--» 
! φ------ + V I φ-------- + V 
--.)+ ρ--}» ρ----- >> 
I A ! +----- + A 
ρ------------- * +-->! DEF !----- > 
+----- + 
φ----------- + 
ewer a + | eq a MP US + φ---» I <Aufruf- l 
+->! TASK !->! «Nummer» !-5! , !->ò! Intervall>!-+ ο-------- + 
I Ee + a aa " ana ρ----------- + V t---> !«Start- | 
TEE .+->! , !->! zeıle> !-+--) 
A | φ----- + AS oe e ον mr A pi * A $m mm d ct πετ“ -ᾱ * 
| +-->)! SEQ !-»! «Nummer» !----------------------- * 
l ----- + δ---------- + 
! +---+ 
ρ--------------------------------- αν En nen a Enge nn nn 
Φ---- 
Funktlon: 


Die angegebenen TASKs bzw.SEQuences werden dem Echtzeitbe- 
triebssystem unter Angabe ihrer Kenndaten  (Prioritat,  Start- 
zeile und ggfs. Aufrufintervall) angemeldet. 

Bei TASKs beträgt das Aufrufintervall maximal 2.54s. Alle Zeıt- 
angaben werden auf 10ms-Stufung abaerundet. 


Beispiele: 


1000 DEF TASK 1,T1,2000,TASK 2,2*T1,2200,SEQ 1,3000 
bzw. 1000 DEF SEQ NotAus,2000, TASK Regler,t reg,«4000 
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TERROR 
Soll eine TASK mit einer größeren Abtastzeit als 2.545 aufge- 
rufen werden, bietet MSRBASIC über die Timer-Funktionen ΤΌΠΟΝ 


folgende Lösungsmöglichkeit: 


100 REM Initialisiarung 


120 DEF TASK 1,2,1000 
130 OIM T0OWN(17 
140 TA=60, T0OWN(1):1 


150 ACTIVATE TASK 1 


1000 REM TASK 1 


1010 IF TDOWN(1)>0 THEN RETURN 
1010 TOOWN(1):TOOWN(1)*TA 
1020 REM Ab hier beginnt die TASK eigentlich. w 


Diese Lösung bietet die Gewahr, daß selbst bei  TASK-Ausfüh- 
rungszeiten >23 keine grob falschen Fehler in den Aufrufinter- 
vallen entstehen. 


Fehler: 


05 TASK bzw. SEQ mit der gewünschten Startzeile 
existiert nicht 


13 Nummer von TASK bzw. SEQ zu groß 
oder: Aufrufintervall größer als 2.540 s 
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&.2.2 START 


Aufruf: 
b- zm ze zm zm zi + 
*===yl GFN) Pese 
I ε------ + V LI » 
---)+ +---)1 START !---)>> 
! A ρ------- H 
Φδ- - --. 2... u... . + 
φ----- * 
92-5! ALL !------- * 
I šu S. + I 
φ------ * i ν---------- + γ 
>»>+--+---)! TASK !-=--->+-+->! «Nummer» !--)+--) 
A | *------ + A *+---------- + A 
I I dem Sa wa m + I ! 
l €---5! SEQ !----- + ! 
! +----- + ! 
! t---+ ! 
Φ-------------------------- I , l<------- * 
(EEN 
Funktion: 
01e im Argument der START-Anweisungen angegeoenen TASKs werden 
zur zyklischen Bearbeitung durch das Betriebssystem  freigege- 
ben. Die Bearbeitung der angegebenen SEQuenzen wird 
grundsätzlich bei der ersten Programmzeile aufgenommen. 
Beispiel: 
100 START TASK 1,TASK 2,SEQ 1 
Fehler: 


26 TASK bzw. SEQ noch nıcht definiert 


«0 Interpreter nicht im Real-Time-Mode (FREEZE- 
Moda) 
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&.2.3 SUSPEND 
Aufruf: 
$e—— * φ--------- + 
t--->! «ΖΝ» !-. *--»! SUSPENO !--+ 
! φ------ + V ! φ--------- + V 
---}» ρ---}» +---)) 
! A ! δ----- + A 
t------------- . t--->! SUS !----- . 
φ----- + 
φ------ + φ---------- + 
+-->! TASK !--» +-->! <Nummer> !--» 
| φ------ * y ! $---------- * V 
»»------* #---.)>+ LEE EE 
A ! +----- + A ! +----- + À ! , 
|^ nei SEQ tsi ἐ----φ ALL Pieces Ss xj tw 
! φ----- $ φ----- + I 
l | 
d +---+ ! 
— nn Lu FL + 
φ---} 
Funktion: 
Die SUSPEND-Anweisung ermöglicht das Stillsgen einzelner oder 
aller TASKs bzw. SEQuenzen. 
Hierbei wird die SEQuenzbearbeitung an der momentanen Stelle 
(i.d.R. eine WAIT-Anweisung) sofort abgebrochen, wobei evtl. 
aktivierte Überwachungs-Zeitgeber (WAIT-MAX-Funktion) ebenfalls 
eingefroren werden, um bei Re-Aktivierung (s.ACTIVATE-An- 
weisung) eine sachfremde Fehlerbehandlung (...ELSE ...) zu 
vermeiden. 
Die Stillegung von TASKs bedeutet, daß kein Neustart mehr 
erfolgt, eine laufende TASK jedoch noch zu Ende georacht wird. 
Um bei Programmierfehlern eine schnelle Abbrechmöglichkeit 
bereitzustellen, können in der Kommandobetriebsart mit der 
TASK-Stop-Taste alle TASKs und mit der SEQ-Stop-Taste alle 
Ablaufsteuerungen stillgelegt werden. Sofern dies aufgrund von 
Endlosschleifen nicht ausreichen sollte, kann über die  Stop-— 
Taste ein endgültiger Programmabbruch erzwungen werden. N j 
; Se 
1120 SUSPEND TASK ALL. SEO) 
Fehler: 
26 TASK bzw. SEQ noch nicht definiert 
&0 [Interpreter nicht im Real-Time-Mode (FREEZE- 
Mode) 
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&.2.& ACTIVATE 


Aufruf: 
ο------ + ---------- + 
t--->! «ΖΝ» !-» *---»! ACTIVATE !-» 
! φ------ + V | ----------- + V 
---)+ φ--ὸϑ» φ---}}᾽ 
| A | — * A 
ρ------------- + *---y! ACT !------ + 
+----- + 
ν----- E 
+=-=)>1 ALL Jasmin + 
! t----- + ! 
φ------ + | φ---------- + V 
yy*+--+--=->! TASK !---λ»-»-»}! <Nummer> !-+*-------------------.--.-.-.-...-.- ts s ay 
A I ------ + A (anna | ---- φ-------------- + À 
t 4 um + ! *+->! , !--»! «Startzeile» !-» 
! +---)! SEQ !----- E +---+ ρ-------------- » 
! φρ----- E 
H +---> 
ρ----------------5---------- E r 
+---> 


Funktion: 


Die im Argument der ACTIVATE-Anweisungen angegebenen TASKs 
werden zur zykliscnen Bearbeitung durch das Betriebssystem 
freigegeben. Die Bearbeitung der angegebenen SEQuenzen wird bei 
der "nächsten" Programmzeile aufgenommen (<-> Unterschied zur 
START-Anweisung). 


Dies ist entweder die erste Zeile der SEQuenz, falls sie noch 
nicht bearbeitet wurde, oder falls sie bereits einmal fertig 
bearbeitet wurde, also auf eine RETURN-Anwaisung gestoßen ist, 
dıe darauf folgende. 


Falls aber die SEQuenz durch eine SUSPEND-Anweisung (oder durch 
die TASK-Stop-Taste) abgebrochen worden war, bewirkt die ACTI- 


VATE-Anweisung eine Wiederaufnahme der SEQuenz-Bearbeitung an 
der Unterbrechungsstelle. 


100 ACTIVATE TASK Regler,SEQ NotAus,2050 
Fehler: 
05 gewunschte Startzeile existiert nicht 
26 TASK bzw. SEQ noch nicht definiert 
40 Interpreter nicht im Real-Time-Mode (FREEZE- ` 


Moda) 
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4.2.5 WAIT 


Aufruf: 

a) WAIT 
b) WAIT 
c) WAIT 
d) WAIT 
e) WAIT 
f) WAIT 
Funktion: 


«Zeit» 

FOR «Bedingung» 

MAX «Zeit» FOR «Bedingung» 

MAX «Zeit» FOR «Bedingung» ELSE «Sprungziel oder Anweisung» 
FOR <81>,...<8n> THEN <Z1>,...<Zn> 

MAX «Zeit» FOR 4815,...«8n» THEN <Z1>,...<2Zn> ELSE «Anweisung» 


w 


Bi: Übergangsbedingungen 
Zi: Fortsetzungs-Programmzeilen-Nummern 


Das WAIT-Statement dient im Rahmen von SEQuenzen zur For- 
mulierung von Weiterschaltbedingungen. 


Die WAiT-Anweisung in der Form a) bis d) unterstützt die in der 
Praxis besonders häufigen linearen Ablaufsteuerungsstrukturen. 


Im allgemeinsten Fall kann jedoch eine Ablaufsteuerung aus 
einem Zustand ın mehrere Folgenzustände übergenen. 


Hierbei sind Zustandsgraphan ein geeignetes Darstellungsmittel: 


δ------ + 
B21 ! ! 831 
φ---------- >! χι ἱέ------------ + 
! (4 
ον nasi . ! 813 
B12 |! u 
y y ¿ 
$------- * φ------- + — 
! ! 823 ! ! 
AES t. ------------------------ A X3 1 
! ! 832 ! ! 
φ------- = — + 


Zustandsdiagramm für eine Steuerung mit 3 Zuständen 


Dieser Sachverhalt kann mit der Form e) und f) der WAIT- 
Anweisung formuliert werden. 
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Hierbei bestimmt bei der internen zyklischen Abprufung der 
obigen Weiterschaltbedingung die erste erfüllte Bedingung «81) 
dıe Zeilennummer <Zi>, bei der die Sequenz fortgesetzt wird. 

Ist die Weiterschaltbedingung innerhalb einer vorgebbaren Über- 
wachungszeit (MAX ...) erfüllt, wird wie bei der IF-Anweisung 


das Programm mit der nächsten Zeile fortgesetzt, ansonsten 
erfolgt eine programmierbare Fehlerbenandlung, die mıt ELSE 
eingeleitet wird. 
HINWEIS: 
In Unterprogrammen ist WAIT nicht erlaubt. 
Beispiele: 
zu a) 1000 REM 10 Minuten warten 
1029 WAIT 60*10 
zu d) 2000 REM Weiterschaltbedingung mit Zeitüberwachung 
2010 WAIT MAX 100 FÜR AOC(1;»XO ELSE 3000 
3000 PRINT "Füllstand nicht rechtzeitig erreicht" 
3010 REM Einla8ventil schließen 
3020 DOUT(1)=0 
3030 STOP 
zu d) «000 REM Boolsche Bedingungen 
{010 WAIT MAX 10 FOR OIfN(1)*0IN(8)*NOT(OIN(T)) >= 1 ELSE 1010 
zu b) WAIT FOR DIN (Hand) * DIN (NotAUS) 
ist aquivalent zu: 
WAIT FOR DIN (Hand) + DIN (NotAUS) > 0 
Fenler: 
14 Unerlaubte Relation im Bedingungsteil 
27 WAIT wurde ausserhalb einer SEQuenz benutzt 
f h 39 WAIT in GOSUB-Unterprogramm nicht erlaubt 
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&.2.6 TRACE 


Aufruf: 
φ------ E φ------- + 
+-->)! <ZN> !--» +-->)! TRACE !--*+ 
! φ------ + V I φ------- + V 
---}λ» ---}» --»λ}λ 
I A | φ----» Α 
————— b *=-==>! TR {---ε 
Φ----φ 
φ---------- + 
+-->! <Nummer> !--» 
| φ---------- * I 
$= === +. 1 γ 
u)! SEQ δν ο σου”. 
ερ : ᾿ — 
--»»* i 
! φ------ + I 
e----5»! Task !----------------- + 
φ------ + 
Funktion: 
Einschalten des TRACE-Modes, d.h. bei Programmlauf wird jede 
Zeile auf der Konsole aufgelistet, bevor sie ausgeführt wird. 
Außerdem wird bei der Ausführung einer INPUT-Anweisung auf 
einem nicht-interaktiv konfigurierten Kanal die eingegebenen 
Zeichen auf der Konsole angezeigt. 
Folgende Varianten sind möglich: 
a) Auslisten aller Befehle (TRACE ohne Zusatz) 
b) Auslisten aller SEQuenz-Anweisungen (TRACE SEQ) 
c) Auslisten aller TASK-Anweisungen (TRACE TASK) 
d) Ein- und Ausschalten einzelner SEQuenzen (TRACE SEQ Misch) 
PIE. 


— 


Die Variante b) des TRACE-Befehls ist insbesondere dann vor- — 
teilhaft, wenn man nur den in einer SEQuenz implementierten 
x übergeordneten Ablauf verfolgen will, nicht jedoch die unterla- 
gerten, zyklischen TASK-Module. 
Durch die Variante d) läßt sich die TRACE-Funktion auch dann 
noch sinnvoll nutzen, wenn viele SEQuenzen aktiv sind. 
Wird eine SEQuenz im TRACE-Modus ausgelistet, dann erscheint 


die SEQuenz-Nummer an der linken Seite der Zeile (wie bel 
SEQLIST). 
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Der folgende Ausschnitt des TRACE-Laufes von drei SEQuenzen Zeigt 
anschaulich die für diesen Programmtyp wirksame Multitasking-Stra- 
tegie nach dem round-robin-Prinzip: 


S01: 1230 0OUT(1)=1 

S02: 2210 DOUT(5)=:0,00UT(6)=0 

S03: 3260 Presse:0 

501: 1240 WAIT MAX 10 FOR OIN(1):0 ELSE 4010 
502: 2220 Fixis! : Fix2=0 


503: 3250 WAIT MAX 5 FOR DIN(10)=1 ELSE 8120 
S02: 2230 WAIT FOR Fix3:0 
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&.2.T NOTRACE 


Aufruf: 
Φ----- + 
φ----» ρ--------- + νο. y 15 SEQ ἵντνν--- + 
+=-=--)!<ZN>!--+ +--->! NOTRACE !--* ! ο----- + ! 
! e----9 V ! φ--------- + V ! V 
---)λ» φ--}» φ---}λη---------------- δφ---ὃ 
| À ! ads ponas M . A I À 
φ------------ + ----ϑγὶ NOTR !----> ! φ------ + ! 
ν------ + *---->! TASK !----+ 
*+------ * 
Funktion: 


Abschalten der  TRACE-Batriebsart global oder für  TASKs 
SEQuenzen (s.TRACE) 


b2w. 
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4.2.8 TASKLIST 
Aufruf: 
+- zm zz + +---- - ----- + 
e---»!4ZN»!--*« ---λι TASKLIST !--* 
! e----- V ! e---------- + V 
— *-- + — 
! Α i +----> A 
+=------ - - - - -- + e----) | TL !------- + 
*—----+ 
Funktion: 
Auslisten der Startzeile, der Priorität und des Zustands aller 
Tasks 
Die TASKLIST-Anweisung zeigt in jeder Zeile die Nummer und den 
Status der ausgelistetan TASKS an. 
f i 
TO! 1000 REM Regler 
Y02: s 2000 REM Speicher 
T03: 3000 .cp5s Filter 
À A 
! ! 
! ν------ Status: s = suspendiert 
1 


MSR-BASIC 4.0 


TASK-Nummern 
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4.2.9 SEQLIST 


Aufruf: 
Φ------ + *#-—---+ φ---------- + 
t--»! «ΖΝ» !--+ *#-->! SL !------ * +---)! (Nummer? !--» 
| $------ + y | φ---- ν ! φ---------- A V 
---}» ρ---}» φρ---)ὸη #%---) 
! A | Α ! A 
φρ------------- + | ρ--------- + t ρ------------------ + 
*-»! SEQLIST !--» 
φ--------- * 
Funktion: 
Auslisten des momentanen Programmzihlerstandes aller SEQuenzen 
Die SEQLIST-Anweisung zeigt in jeder Zeile die Nummer und den 
Status der ausgelisteten SEQUENZ an. 
8eispiel: 
a) SL 
S01: $ 1210 WAIT FOR DIN(HAND)=1 
$02: s 2190 REM ---- ABFAHRSEQUENZ -- 
S03: s 3050 WAIT MAX 60 FOR OIN(XSi1105)-:0 ELSE 3100 
A A 
! d 
! ν------ Status: s = suspendiert 
I 
*+------------ SEQ-Nummer 


b) SL Fuel: 


S09: &070 WAIT MAX 10*60 FOR OIN(xS3max) ELSE 4430 
READY 


š T" 


a) Die SEQLIST-Anweisung läßt sich für eine zyklisch aufgerufene 
Steuerungs-Zustandsübersicht$ — 


b) Das Bedienpersonal kann durch Betätigen einer Taste die SEQ- 

LIST-Funktion zur Fehlersuche aufrufen; besonders wertvoll ist 
dies bei der Fehlersuche in gegenseitig verriegelten 
Ablaufsteuerungssprogrammen. 
Liegt zum Beispiel eine Verklemmung vor, d.h. einige SEQuenzean 
warten - vergeblich - auf die gegenseitige Erfüllung einer 
Weiterschaltbedingung, so listet die SEQLIST-Funktion die frag- 
lichen WAIT-Anweisungen aus. Durch manuelles Prüfen der Weiter- 
schaltbedingung kann dann in der Regel rasch die Fenlerursache 
gefunden werden. 
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&.3 LOGIKFUNKTIONEN 


NOT(X) liefert den Wert "1", wenn X=0 ist, sonst den Wert "07 


4.3.2 8ITIN,X) 


BIT(N,X) wandelt X in eine 16-Bit-Zanl ( -32768 <x<32767) und 


u N 
| &.3.1: NOT(X) 
Xa 
liefert den Wert ^1", wenn das N-te Bit (O<=N<:15) gesetzt ist. 
| 


m. 6.3.3 BOOLSCHE' AUSDRÜCKE 

| Die Boolschen Operatoren AND und OR können auf die arithmeti- 
| schen Operatoren * und + zurückgeführt werden. 

Beispiel: 


a)Funktionsplan 


καμια μμ πμ U E aan . 
Χ1 --—————————— nun > Ι φρ----» 
I bast +--)0 ! 
| ass R — Y | Tr > Y2 
| Wd WE yt >= | (E f£! ! 
ο----- 9 


b) MSRBASIC-Formullerung 


00UT(2) = OIN(1)*(OIN(3) + NOT(DIN(&)) * NOT(OIN(2)) 
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A.A PROZESS Ε/Α FUNKTIONEN 


4.4.1 SKALARE PROZESS-EINGABEFUNKTIONEN 


4.6.1.1 AO0C(N) 
ADC(N) 


4.6.1.2 DIN(N) 


DIN(N) 
Ł.4.1.3 GETIN) 


᾿ΘΕΤΙΝ) 


6.5.1.4. CNT(N) 


CNT(N) 


Einlesen eines 1!6-8it-Werts vom Analogkanal N 
Skalierung ist konfigurationsabhängig 


Einlesen des Binärkanıls N 
Wert beträgt 0 oder | 


Einlesen des CPU-I/O-Ports N w 
Wert liegt zwischen O und 255 (8-Bit-Version) 
bzw. 0 und 84 k (16-Bit-Veısiıon) 


Einlesen eines 16 Bit Zahlerkanals 


4.4.2 SKALARE PROZESS-AUSGABEFUNKTIONEN 


Ausgabefunktionen stehen auf der Linken Seite von Zuwelsungen. 


4.4.2.1 DAC(N) 


DAC(N) 


4.6.2.2 DOUTI(N) 


DOUT(N) 


4.6.2.3  PUTI(N) 


PUT(N) 


6.4.2.4. CNT(N) 


CNT(N) 


MSR-8ASIC 4.0 


Ausgabe auf Stellkanal N (16 Bit genau) 
Skalierung ist konfigurationsabhängıg 


Setzen des Binärkanals N 
Wert betragt O oder Nicht-Null 


Ausgabe einer 8-8it-Zahl (Wert O ... 255) — 
auf CPU-I/O-Port N 

Wert liegt zwischen 0 und 255 (8-81it-Version) 

bzw. 0 und 84 k (16-8it-Version) 


Setzen eines 15 Bit Zahlerkanals 
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4.4.3 VEKTOR-E/A-FUNKTIONEN 
Vektorfunktionen werden im Rahmen von VEC-Anweisungen ausgeführt (s.d.) 


&.4.3.1 MADC(MO) 
MADC(MO) Einlesen eines Meßvektors 
(Komponenten des Meßortvektors MO legen die einzelnen 


Eingabekanäle fest) 
&.,.3.2  MOAC(SO) 
MDAC(SO) Ausgabe eines Stallvektors 
(Komponenten des Stellortsvektors SO legen die einzel- 
nen Ausgabekanale fest) 


%.6.3.3 MOIN(MD) 


MDIN(MO0) Einlesen eines B8Binàarvektors 


&.4.3.4  MDOUT(SO) 


MOOUT(SO) Ausgabe eines binären Steuervektors 


8eispiel: 
150 DIM XE(N), MO(N), Y(N), SO(N) 
T T XE:MADC(MO), MOAC(SO):Y 
ist äquıvalent zu: 
1000 FOR Is! TO N 


1010 XE(I) = AOC(MO(I)), OAC(SO(I))=Y(I) 
1020 NEXT I 
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4.4.4 ABFRAGE DER PROZESSKONFIGURATION 


4.4.6.1 NOAC 


NDAC r liefert die Anzahl der installierten DAC-Kanile 


6.4.6.2 NAOC 


NADC r liefert die Anzahl der installierten ADC-Kanäale 


4.6.6.3  NDOUT 


NDOUT r liefert die Anzahl der installierten DOUT-Ports (8 Kanäle/Port) 


= 
4.4.4.4 NOIN 


NOIN r liefert die Anzahl der installierten DIN-Ports (8 Kanäle/Port) 


4.6.8.5 NCNT 


NCNT: r liefert die Anzahl der installierten CNT-Kanale 
Beispiel: 


For 1=1 to B*NDIN 
Print DIN(ı) as i; 
Next i 
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&.5 ZEITGEBERFUNKTIONEN 


&.5.1 TDOWN,TUP 


Die Zeitgeber TDOWN (aufwärtszählend) und TUP (abwartszählend), 
werden wie eindimensionale numerische Felder behandelt. 


a) Deklarıeren: 


DIM TUP(3),TDOWN( 1) 3 Aufwarts-, 1 Abwartszeitzahler 
deklarieren 
b) Verändern: 
TDOWN(1)=100 100 s vorbesetzten 
C) Lesen: 
PRINT TUP(2) Momentanstand von Aufwärtszeitgeber 
2 ausdrucken 
Der Zeittakt betragt !s (Voreinstellung). 
4.5.2 TIMES κ 
Die Variable TIMES enthält bel Lesezugriff die Tageszeit in der 
Form: 
“hh:mm:ss” (hh=Stunden, mm=Mınuten, ss=Sekunden). 
4.5.3 DATES 
Die Variable DATES enthält bei Lesezugriff das Datum 1η der 
Form: 
"dd:mm:aa" (dd=Tage, mm=Monate, aa-Jahre) 
4.5.4 DON 


Die "Variable DONS gibt die englische Kurzform des aktuellen 
Wochentages wieder: 


SUN Sonntag THU Donnerstag 
MON Montag FRI Freitag 
TUE Dienstag SAT Samstag 
WED Mittwoch 


Hinweis; Voraussetzung ist eine Hardware-Uhr und ihre Anbindung an 
MSRBASIC durch den Installateur. 


MSR-BASIC 59. HANDBUCH 09/88 SEITE -ᾱ2- 


&.5.5 TIME-FACTOR 
Ein Lesezugriff auf TIME FACTOR liefert das aktuelle Aufrufintervall 
der MSR-8ASIC-internen Zeitgeber-Task in lO0ms-Einheiten. 
In der Regel nat TIME FACTOR den Wert 100(21s Zeitauflosungi|. 
In einzelnen Fällen kann es sinnvoll sein, die Zeıtınkremente zu 
verändern (insbesondere zu verkürzan;. Eine Auflösung von !00ms er- 
reicht man durch die Anweisung: 

TIME FACTOR = 10 


Diese Beschleunigung wirkt sich aus auf: 


- TUP- /TDOWN-Felder 
- Wartezeit in WAIT/WAIT MAX-Anweisung 


Sie wirkt sich nicht aus auf TASK-Aufrufintervalle !! 
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4.6 REGLERFUNKTIONEN 


4.8.1 ALLGEMEINES 


Als  parametrierbare Reglerfunktionsplöcke werden in MSR-BASIC 
(skalare ‚und vektorwertige) PI- und PID-Regelalgorıthmen mit 


Positions- und Geschwindigkeits-Ausgang angeboten. Sie realı- 
sieren folgende Grundformel: 


Berechnen des Zuwachses: 

Dyli := Kp*(ei-ei-leKI*teieKO*(ei-2tei1-1e«e1-2]) 
A<- nur bei PID -->A 

Umspeichern der vergangenen Regeldifferenzen: 

81-2 := 81-1, @1-1 :- ei 


Die Stellungsversion summiert dazu noch die Stellinkremente 
auf: yl τα γι we yi 


Der MSRBASIC-PID-Funktionsblock entspricht folgendem BASIC- 
Programm: 


1000 REM PID-Algorithmus 
1010 REM 8edingte Bildung des Integralteils 


1020 IF AK*EX:0 THEN I=KIrE ELSE ΙΞ0 

1030 DY = KP*(E-E1 » [ + KVr(E-2rEI-E2)) 
1040 AK = AK+DY 

1050 E2 x Εἰ, Εἰ a 6 

1060 DY = AK 

1070 REM Stellsignal begrenzen 

1080 IF DY>0 THEN GOSUB 1100 ELSE GOSUB 1150 
1090 AK s ΑΚ-ΟΥ, Y = Υ»0Υ 


1099 RETURN 


1109 REM positives Stellinkrement begrenzen 


1110 IF 0Y»YO THEN ΟΥΞΥΟ 
1120 IF 0Y»YO-Y THEN DY=YO-Y 
1130 IF 0Y»YU-Y THEN DY=YU-Y 


1140 RETURN 


1150 REM negatives Stellinkrement begrenzen 


1180 [F ΟΥς-Υ0 THEN ΟΥΞΥ0 
1170 IF DY<YU-Y THEN DY=YU-Y 
1180 IF OY>YO-Y THEN ΟΥΞΥΟ-Υ 


1190 RETURN 
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Über den reinen PID-Algorithmus hinaus (Zeile 1030 und 1090:2) sind also 
folgende wichtige Funktionen realisiert: 


* Stoßfreie on-line-Parameterverstellung durch interne 
Geschwindigkeitsform 


* Automatisches Abschalten des I-Anteils (Zeile 1020), wenn 


eine Stellgrößen- oder Stallgeschwındigkeitsbeschränkung 
(Zeilen 1100 bis 1190) erreicht wird (Verhinderung der Intag- 
ralsattigungl. 


* Verhinderung des proportional-differentialen Anfahreffekt bei 
den Versionen mit Geschwindigkeitsausgang durch die Zwischen- 
speichermethode (1040,1060,1090) 


τ Automatische Stellgrößenanpassung an dynamısch veränderte | 
Grenzwerte YO bzw. YU (1130,1180) (wichtig bei Kaskaden- 
schaltung !) 


Es ist allerdings zu beachten, daß der I-Anteil (Kl) niemals zu null 
gesetzt werden darf, da sonst große stationäre Regelcifferenzen auftreten 
(Integraler Offset). 


6.6.2 P/PIO-EINZELREGLER 


Die Qeglerfunktionen können syntaktisch wie Standardfunktionen 
verwendet werden, also auch in arithmetische Ausdrücke einge- 
bunden werden. Als Ausgangsgröße wird je nach Algorithmus der 
Momentanwert der Stellgro8e oder der Stellgeschwindigkeit ge- 


liefert. 
PID-Stellungsalgorithmus:........ PID(Y,E,ET,ER,KP,KD,KI, YO, YU, YO, AK) - 
P[D-Geschwindigkeitsalgorithmus:. GPIO(Y,E,EI, E2, KP, KO, KI,YO, YU, YO,AK) 
Pl-Stellungsalgorithmus:......... PI(Y,E, ET, KP, KI, YO, YU, YD, AK) 
PI-Geschwindigkeitsalgorithmus:.. GPI(Y,E,EI,KP,KI,YO,YU, YO,AK) 


Hierbei bedeuten: 
Y : Stellgröße 


E : momentane Regeldifferenz (Eingangsgro8e) 
ΕΙ: letzte Regeldifferenz (Zustandsgröße) 
E2: vorletzte Regeldifferenz (Zustandsgröße) 
AK: Zwischenspeicher (Zustandsgröße) 
KP: Verstärkung 

KD: Differentialbeiwert (Regler-Parameter) 


KI: Integralbeiwert 

YO: Stellgrößencbergrenze 

YU: Stellgrößenuntergrenze (Parameter) 
YD: Max. Stellgrößenzuwachs 


Zu beachten ist, daß die Reglerfunktionen neben dem Stellsignal als ei- 
gentlicher Ausgangsgröße auch das Umspeichern der früheren Werte der Re- 
geldifferenz und die Verwaltung des Zwischenspeichers vornehmen. Der An- 
wender muß hierfür nur die entsprechenden Variablen bereitstellen. 
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k. 


6. 


3 


VEKTOR P/PID-RESLER 


Im Rahmen des VEC-Statements können neben den ΡΓΟΖΘΒ-Ε/Α- 
Funktionen MADC, MOIN, MOAC, MOOUT auch dia Reglerblöcke PI und 
PID verwendet werden. Eine Anweisung: 


1000 VEC Y = PILY, E, EC, KP, KT, YO, YU, (ü AK) 

ist funktionell gleichbedeutend mit: 

1000 FOR I=:1 TO N 

1010 Y(I) = PI(YCI),ECI), ETCI), KPCI), KICI), YOQCI), 


YUCI), YOCI), AK(I) 
1020 NEXT I 


Allerdings halbiert sich bei Verwendung der VEC-Anweisung  so- 
wohl der Schreib- wie der Rechenaufwand. 
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5. EIN/AUSGABE-SPRACHMITTEL 


5.1 ÜBERSICHT 


Ein Hauptvorteil von MSRBASIC ist seine Fähigkeit, auch ım 
Multitask-8etrieb unmittelbare Kommandoeingaben zu verarbeiten. 


Dia im folgenden beschriebenen MSR-Features verbessern diesen 
Ansatz ganz wesentlich durch 


- Fenstertechnik zur automatischen Trennung der Kommando-E/A- 
Vorgänge von programmgesteuerten Bıldschirmzugriffen 
(Prozeßdarstellung, Pro tokoliierung etc.) 


- Terminal-unabhängige Cursor-Positionierung im Rahmen der 
PRINT-An welsung 


- Schneller Zugriff auf als Files abgelegte Bildschirmmaskeu 


- Beschleunigung der Kommando-8edienung auch bei hoher 
Echtzeitbe-lastung 


- Einfache Gestaltung von Steuerungs-Übersichtsbildern durch 
verbes serta SEQLIST-Programmanweisung 


- Erweiterung der TRACE-Anweisung, um gezielt einzelne SEQuen- 
zen zu verfolgen. 


5.1.1 FENSTERTECHNIK 


Die MSR-Fenstertechnik erleichtert in hohem Maß die aufwandsar- 
me Implementierung von CRT-basierenden Bedien- und Anzeigefınk- 
tionen mit MSRBASIC, wobei insbesondere die residenten Echt- 
zeiteingriffsmöglichkeiten von MSRBASIC unterstützt werden. 


Der Bildschirm wird hierbei in ein oberes und ein unteres 
Fenster aufgeteilt. 


Das obere Fenster ("Anwenderfenster”) steht dem MSR-Anwender- 
programm für die Ausgabe mit Hilfe von PRINT-Anweisungen zur 
Verfügung. 


Wie die beiliegenden Beispiele zeigen, lassen sich in diesem 
Fenster übliche Darstellungsformen der Prozeßleittechnik wie 
z.B. Balkendiagramme oder Trendkurven implementieren. Insbeson- 
dere unterstützt die THERMOPLAN-Fenstertechnik den situations- 
bedingten Wechsel verschiedener Prozeßdarstellungen. 


Das untere Fenster erlaubt Zugriffe auf den MSRBASIC-Kommando- 
Interpreter. 
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Dieses Fenster (^Kommandofenster^) wird aktiviert bei: 
- MSR-BASIC-Kommandos (7.8. LIST, SEQLIST etc.), 
- direkten Anweisungen (z.B. PRINT Y, W=50 etc.), 


- Fehlermeldungen 
- TRACE-Ausgaben 


Die MSR-Fenstertechnik stellt softwaretechnisch ein Ausgabefil- 
ter dar, das bei jeder Ausgabeanforderung des MSRBASIC-Inter- 
preters den momentanen, internen Status des  Interpreters 
auswertet, um das aktuelle Zeichen in das richtige Fenster zu 
positionieren. 


{ | Diese Methode garantiert eine absolute Unabhängigkeit der 
Anwenderprogrammierung von der Fensterverwaltung (Transparenz). 


5.1.2 PROGRAMMIERUNG 


Die Fenstertechnik wird aktiviert und desaktivıiert über die 
MSR-BASIC Systemvariable UPPER_SCREEN. 


Window Einschalten: 
Aufruf: <NNNN> UPPER SCREEN = NWIN Zur 
NWIN: Zeilenanzanl des oberen Fensters (0 < NWIN« 23) 


Wirkung: - Bıldschırm löschen 
- MSR-Fensterfunktion aktivieren 


Window Ausschalten: 
Aufruf: UPPER SCREEN = 0 bzw. (εἰς 


Wirkung: - Bildschirm loschen 
- MSR-Fensterfunktion ausschalten 


YN . 
Aufruf : PRINT [Zeıle,Spalte] «Zeichen» 
Wirkung: - Cursor auf Position Zeile,Spalte setzen 


- «Zeichen» ausgeben 
Masken-Qateien ausgeben: 


Aufruf: OPEN «Maskanname»,«Log.Einherit»,! 
COMMAND (Log.Einheit):! 
CLOSE «Log. Einheit» 
Wirkung: - Datei «Maskenname» wird auf den Bildschirm ausgegeben. 
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Abfragen des oberen Fensters; 


Aufruf: print UPPER_SCREEN 


BEISPIEL Demoprogramm WINDEM.BAS 
22233233 
Das Programm WINDEM.BAS ist als seinfachstes Nıcht-Echtzeit- 
Beispiel konzipiert. 
Zunächst wird in den Zeilen 110-130 das LIST-File des  Demopro- 
gramms  (^WOLIS.8AS") quasi als Bildschirm-Maske  ausgeworfen 
(sofern die Datei vorhanden ist). 
Nach einer Wartezeit wird der Bildschirm geteilt (2.140). In der 
Folge wird gezeigt, wie programmgesteuarte Ausgaben automatisch 
in das obere Fenster gelangen, während die TRACE-Anzaige 1η das 
untere Fenster gelenkt wird. 
100 REM ---------------- WINOEM.8AS ------------------- 
102 REM 01.06.88 
104 REM 
105 CLS 
110 OPEN *"WOLIS.8AS^,10,1 
120 IF BIT(7,STATUS(10))=1 THEN COMMAND(10)=1 
130 CLOSE 10 
135 FOR I=1 TO 1000 
136 NEXT I 
140 UPPER SCREEN = 8 
150 TRACE 
160 PRINT [0,10] ` MSR-Zweifenstertechnik ` 
200 FOR [=1 TO 20 
210 PRINT CHRS(I + 64); 
220 NEXT I 
230 NOTRACE 
240 STOP 
Am Bildschirm ergibt sich folgendes Bild: 
ο ον... μμ ER i 
Programm- 0! MSR-Zweifenstertechnik - 
Fenster ! ABCDEFGH ! 
------------ »8 
9 ! d 
Kommando- ! 210 PRINT CHRS$(I*84); | 
Fenster ! 220 NEXT I ! 
! 210 PRINT CHR$(I*84); ! 
! 220 NEXT I | 
! 210 PRINT CHRS(I*84); ! 
! 220 NEXT I ! 
SE I 
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5.2 E/A-ANWEISUNGEN 


5.2.1 INPUT 


Aufruf: 
$ % — = sa + ------- + Φ---- Φ--------- + 
===)! <ZNJ !--* +-->! INPUT !--+ +-->! ON !--! «Kanal» !--» 
! ρ------ + V I φ------- + γ 1 *+-----+ φ--------- + V 
mi ae sbb $ = S $ b-c)? 
I A I += s= * A I A 
$--------2----- + t----)! I !----» ρ------------------------ + 
*+---+ 
ρ------------ + 
-222*--»! <Variable) !-)+---) 
A δ------------ + l 
l δ---- I 
ρ------ I, ἐί------- + 
Φ---ν 


Funktion: 


Das INPUT-Statemert ermöglicht das programmgesteuerte Einlesen 
alphanumerischer Daten von 


- der Konsole (Nr. 0) 
- einem seriellen E/A-Kanal ([NPUT ON(1...9)) 
- einem Dateı-Kanal (INPUT ON(10...19)) 


Die Daten-Kanäle müssen vorher mit OPEN geöffnet worden sein. 


Bei der Ausführung des INPUT-Statements wird grundsätzlich auf 

den Eingabekanal sin Fragezeichen ausgegeben und die Eingabe 

| geechot, wenn er als interaktiver Eingabekanal installiert 

wurde (s. Installationsanweisung). Beim Eınlesen von einem als 

nicht interaktiv in stallierten Kanal wird das Echo 

unterdrückt. In der TRACE- Betriebsart werden aller- 

f dings die übersandten Zeichen zur Kon trolle auf der 
Bedienkonsole ausgegeben. 


Sofern numerische Daten eingelesen werden, müssen sie durch 
"es "- Zeichen getrennt werden. 


, - oder 


Beim Einlesen einer Stringvariablen werden führende Leerzeichen 


verworfen und nur das "," als Trennzeichen gewertet. 


Bei fehlerhafter oder unvollständiger Eingabe wird über eine 
unmittelbare Abfrage von Bit 3 im Kanal-STATUS-Wort der Einga- 
bezustand überprüft. Die INPUT-Anweisung ist grundsätzlich 
TIMEOUT gesichert, d.h. wird eine Eingabe nicht innerhalb 20s 
abgeschlossen, gilt die Eingabe als fehlerhaft. 
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Beispiel: 


Fehler: 


MSR-BASIC 


INPUT ON(S1vLU) AŠ 
IF 8IT(InpErr) THEN... 


Die Eingabe und damit das Programm kann unabhangig von der 
angewahlten E£inleseeinheit von der Kommandokonsole mit der 
Stop-Taste abgebrochen werden. 


INPUT Α,8,Α5 

2 1,2,ENOE 

READY 

PRINT Α,8,Α5 

1.0000€ 00 2.0N000E 00 ENDE 
READY 


: | ΜΝ 


Bei Multitaskbetrieb ist die Banutzung des INPUT-Statements mit 
Vorsicht zu behandeln. Zwar kann es entgegen den sonstigen 
Regeln von höherprioren TASKs unterbrochen werden, es darf aber 
im unterbrechenden Programm kein neues INPUT-Statement aufge- 
setzt werden. 


Wenn derartige Konkurrenzfälle nicht ausgeschlossen werden 
konnen, empfiehlt es sich, die INPUT-Anweisung nur im Hinter- 


grundprogramm zu verwenden und Einlesevorgänge in kEchtzeitre- 
chenprozessen über die [NCHAR$-Funktion zu formulieren (s.d.!). 


08 Fehlerhafte Variable in Einleseliste 


& 1 Mehr als eine [NPUT-Anweisung aktiv 


58 Lesen von als write-only eröffneter Datei 
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5.2.2 PRINT 
Aufruf 
Add EE + φ------- + +, zm zm zm zm mm 5 zm 2 2 2 2 2 2 2. 2 2 2 em om mi + 
+-->! «ΖΝ» !--» +-->! PRINT !--» +-->)! ON ( <Kanalnummer> ) !--» 
! ------ + V ! ------- + V I +--- - - - -- - - -- - - - - == -- -- r V 
omm o ρ--}» +--)>+ 
! A ! $---- A ! A 
t----- -- - - - --- + φ----»ι P 1----+ ρ----------------------------- + 
t---+ 
φ--------ο-------- * 
+-->! <Druckoperand> !--» 
I ρ---------------- + V 
---))+ ERES: 
I A 
φ----------------------- + 
Funktion: 
Die PRINT-Anweisung ermöglicht die Ausgabe von beliebigen Zei- 


chenfolgen und Zahlenwerten auf dem Bildschirm oder einer frei 
wählbaren Ein-/Ausgabe-Einheit (Benutzung des ON-Zweiges). Die 
Tabellierung kann mit Hilfe eines oder mehrerer Kommas zwischen 
den auszugebenden Daten vorgenommen werden. Die Formatierung 
von Zahlenwerten erfolgt über die AS-Angabe. 

Die logischen Einheiten 10-19 erlauben Ausgabe auf Diskettenda- 
tei. Diese muß vorher mit OPEN im richtigen Mode eröffnet und, 
falls nicht vorhanden, mit CREATE angelegt worden sein. 


Druckoperand: 


Yi ET 


A 
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.----ν φ5--------- * 
—F c9 +--)1 AS !--»! <Format> !--* 
I <numerischer ! | .----» ---------- + V 
Ausdruck» !--*+ +--)+--)+--) 

I φ-------------- + I A A ! 
! ρ---------- + ——————————Á + ! ! 
! I «Text- ! ! d 
*---»! AuS0dEMER RI ae >+ ! 
! $-----2-2-2--- * φ------------------ . Α I 
! *--»! (<Zeile,Spalte>x] !--* ! ! 
d I φωνών E et ν | Ι I 
! I ---- V ! I 
ρ----------------- φ---}! , !--------------- λφ--------- + I 
— + Φ--- ! 
nt Ιί--» ! 
V φ---» I l 
π-π------------------Ὢ-----Ὃπ------ + φέ------------» 

Α φ---}» l 

+---1 os. !<--*+ 

+--- + 
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Labelliərunq. 


Bei der voreingestellten Tabellierung wird eine Ausgabezeile in 
5 Felder mit einer Länge von 13 Zeichen eingeteilt. Die Verwen- 
dung des Kommas als Trennungszeichen bewirkt ein Vorrücken der 
Oruckposition zum Beginn des nächsten 13er Feldes. Soll dies 
verhindert werden, muß der Strichpunkt als Trennungszeichen 
verwendet werden. Wenn der automatische  Zeilenvorschub bel 
Beendigung des PRINT-Statements unterbunden werden soll, muß 
als letztes Zeichen ein Komma oder Strichpunkt gesetzt werden. 


TM 


Nach jedem "i^-Zeichen kann eine Cursor-Positionierung 
vorgenommen werden. 


F . ^ N / 
Folgende Ausgabeformate stehen zur Verfügung: 
1. E-Format (Gleitkomma) 


Das Format hat die Form ΕΕΚ bzw. (Ο{Εκ), wobei f die Feldlange 
(Gesamtzahl dər Zeichen mit Vorzeichen und Punkt) und k dıe 
Anzahl der Nachkommastellen der Mantisse angibt. 


2. F-Format (Festkomma) 


Das F-Format hat die Form fFk bzw. (OfFk), wobei f die Feldlän- 
ge und k die Nachkommastellen (ohne Punkt) festlagt. 


3. I-Format (Ganzzahl) 


Das I-Format hat die Form fI bzw.  (OfI), wobei f die Feldlänge 
(Stellenzahl) festlagt. 


In allen Fällen werden die Zahlen auf das entsprechende  Ausga- 
beformat gerundet (nicht abgeschnitten). Sofern der auszuge- 
bende Zahlenwert im Rahmen das gewünschten Formats nıcht dar- 
stellbar ist, wird dia gesamte Feldlänge mit dem "*"-Zeichen 
beschrieben. 


Grundeinstellung ist das Format 12E4, wobei die Ausgabe führen 
der Nullen durch Angabe einer vorangestellten Null in WI 
Formatspezifikation veranla8t werden kann. 

"mm ; 
al 19 A=7.78 


20 PRINT A AS 5I,A AS 10F3,A AS 12E2,A,A AS AE? 
30 STOP 


Ergebnis: 


8 7.780 7.78E 00  7.7800E 00 triti 
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b) 10 PRINT 
20 REM 
30 ἘΝ 
100 PRINT 
110 PRINT 
120 PRINT 
200 PRINT 
210 PRINT 
220 PRINT 
300 PRINT 
310 PRINT 
320 PRINT 
999 STOP 
Ergebnis: 
PRINTST 


Fehler: 
08 


59 
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ON(plu) “PRINTST 


2-1 

ON(plu) "Integer-Format” 
ON(plu) a AS 6I, b AS 8I 
ON(plu) a AS 06ἵ, b AS 061 
ON(plu) "Festkomma-Format” 
ON(plu) a AS 9F«4, b AS 9F«4 
ON(plu) a AS 09F4, b AS 09Ε6 
ON(plu) "Gleitkomma-Format^ 
ON(plu) a AS 9E2, b AS 9E2 
ON(plu) a AS 0962, b AS 0362 


Integer-Format 


! 
000001 


-1 
-00001 


Festkomma-Format 


1.0000 
0001.0000 


-1.0000 
-001.0000 


Gleitkomma-Format 


1.00€ 00 
01.00E 00 


-1.00E 00 
-1.00E 00 


Syntaktisch falsche Form 


Schreiben auf als read-only eröffnete Datei 
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SEITE: -4^- 


| 


Ss 


E 


5.3.4 


3 


Ska? 


e d'r 


"E p 
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SCHNITTSTELLENFUNKTIONEN 


EOF (LU) 


Die EOF-Funktion hat den Wert 0, wenn beim letzten Zugriff auf 
den seriellen Einlese-Kanal LU vom Betriebssystem keine EOF- 
Bedingung zurückgemeldet wurde bzw. wenn das nächste  Einlese- 
zeichen kein `Z (CP/M-EOF-Zeichen) ist. Eine EOF-Bedingung kann 
damit als "Kein weiteres Eingabe-Zeichen vorhanden"  interpre- 
tiert werden und ist in dieser Form (unter CP/M) werksseitig 
für den CON:-Kanal wie für die Datei-Kanäle implementiert. 


Beispiel: "Auf Zeicheneingabe warten" 


1180 WAIT MAX 10 FOR EOF(0)z0 


INCHAR$ (LU) 


Die INCHARS-Funktion liest - falls vorhanden - ein Zeichen von 
der durch den Wert von LU bestimmten logischen Einheit ain. 
Falls kein Zeichen anliegt, wird ein Nullstrıng übergeben. Man 
beachte, 4348 INCHARS kein Echo auf den Eingabekanal auslöst. 


Die INCHAR$-Funktion ist dann vorteilhaft, wenn man Fehleinga- 
ben des gedieners sofort und gezisit abfangen 
will. 


STATUS(LU) 


Die STATUS-Funktion liefert in Form eines Zahlenwertes den 
momentanen Zustand des seriellen Kanals LU. Dieser Zahlenwert 
wird vom Betriebssystem in Form einer 16Bit-Zanl übergeben. 
Hierbei sind nur die Teile der unteren 8-8it werksseitig belegt 
und zwar: 


Bit 7: si, wenn LU geöffnet ist 

Bit 6: =1, wenn LU als Write-only-Kanal konfiguriert ist 
Bit 5: =1, wenn EOF-Bedingung aufgetreten ist (=EOF(LU)) 
Bit 4: (reserviert) 

8it 2: nach INPUT-Anweisung: 1-TIMEOUT bei INPUT 

Bit 2: (reserviert) l 

Bit 1: 31, wenn ein Zeichen ausgegeben werden kann 

Bit 0: =1, wenn ein Zeichen zum Einlesen bereit ist 


8eispiel:' Warten auf Eingabe mit Timeout” 


1190 WAIT MAX 10 FOR BIT 


COMMAND (LU) 


Die  COMMAND-Funktion stellt das Gegenstück zur STATUS-Funktion 
dar. Sie liefert an das Betriebssystem einen vom Benutzer 
vorgebbaren 16-Bit-Wert, der als Steuerwort zu interpretieren 
ist. 
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6. STANDARDSPRACHMITTEL 


6.1 PROGRAMMFLUSSTEUERUNG 


6.1.1 FOR 
Aufruf: 
— - + 
+-->! FOR !--* ροών.» + 
ewe + l +----- + V ! <Lauf- | .---» φ------------ + 
„a: CNY Lan *---»! variable>!--)! = !--5! <Startwert>!-->> 
φ------ + ! +---+ À ρ---------- + φ---» Ee Ma Sk še walas + 
*#-—-—->! F !---» 
— + 
#-—--*+ φρ----------- = 
>>-! TQ !--»! <Endwert) |--λο---------------------------.-κ«πκ }Φ---} 
φρ----» ρ----------- * ! E A 
! ------ E ρ---------------- + I 
+-->! STEP !--»! «Schrittweite» !--+ 
φ------ + Φδ---------------- + 


Funktion: 


Beispiel: 


MSR-BASIC 


Die FOR-Anweisung erlaubt den Aufbau von Laufschleifen. Als 
Laufvariable darf nur eine skalara numerische Variable verwen- 
det werden, während Startwert,  cndwert und Schrittweite durch 
arıthmetische Ausdrücke vorgegeben werden können (alle Werte 
erlaubt). Falls eine explizite Schrittweitenangabe fehlt, wird 
als Schrittweite “1” genommen. 


Zu beachten ıst, daß die Laufschleife wenigstens einmal durch- 


laufen wird, da die Abbruchbedingung erst im NEXT-Statement 
geprüft wırd. Weiterhin sollte man nicht aus einer Laufschleife 
direkt springen, sondern bei Erfüllung einer zweiten  Ab- 


bruchbedingung die Laufvariable auf den Endwert setzen (sonst 
evt. Schwierigkeiten mit Stack für Laufvariable). 


Maximal 10 Laufschleifen konnen ineinander verschachtelt  wer- 
den. 


Die Verwendung von FOR/NEXT-Schleifen in TASKs und SEQuenzen 


ist moglich, allerdings müssen unterschiedliche Laufvariable 
verwendet werden (sonst Fehlermeldung 20). 


1000 FOR 151 TO N STEP 2 


1020 FOR J=1 TO M 

1030 FI=I,F)J=) 

1040 IF A([I,J) »10000 THEN [:N,J-:M 
1050 MEXT J 


1060 NEXT I 
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1070 IF FJ«M THEN PRINT "Treffer !^ 
Fehler: 


16 “="-Zeichen fehlt 
17 “το” oder “STEP” fehlt 
18 Mehr als 10 verschachtelte Laufschleifen 


20 Laufvariable bereits in (auB8erer) Schleife (oder in anderer 
TASK, SEQuenz, Hintergrundprogramm) verwendet 


21 Laufvariable ist Vektor oder String 


w 
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Aufruf: 
φ------- + 
νο» NEXT ἰ--» 

------- D ! φ------- + V φ---------------- + 
--5»411.62Ν} !1--»» *--->! «Laufvariable» !----> 
*------ + ! φ---} A φ---------------- + 
+----) I N ἰ---» 

---» 


Funkt ion: 


Die NEXT-Anweisung bestimmt das Ende einer Laufschleife. Hierzu 
wird grundsätzlich die Laufvariable um die Schrittweite erhöht 
und die Schleife abgebrochen, wenn der neue Wert der Laufvaria- 
blen uber der Grenze liegt. Dh, daß nach Beendigung der 
Schleife die Laufvariable größer als der Endwert ist. 


Beispiel: 
Siene FOR-Statement 
Fehler: 
19 NEXT wird vor FOR bearbeitet 
20 Laufvariable in FOR und NEXT nicht identisch 
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86.1.3 605υ8 


Aufruf: 
φ------- + 
+--->! GOSUB !---* 
— - + ! $------- E V +------ + 
---»! «ΖΝ» !--»» +-->! «ΖΝ» !---»5 
φ------ + | φ----5 À 4------ + 
φ---»! GS !------ + 
----ὸ 
Funktion: 
Mit dem GOSUB-Statement werden BASIC-Unterprogramme ee | 
Aus dem Unterprogramm muß uber das RETURN-Statament ın da 
aufrufende Programm zurückgekehrt werden (Verschachtelungstiefe 
beliebig). 
TY 
1000 GOSUB 2000 
2000 RETURN 
Fehler: 


05 Unterprogramm mit der gewünschten Nummer 
existert nicht 
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5.1.& RETURN 


Aufruf: 


t------ + ν-------- + 
*=--->! <ZN> !--+ +-->! RETURN !--» 
I φ------ » ν | φ-------- + γ 

-- ->e φ--}λ} pum m 
l A ! ----» Α 
ρ-------------- » ρ----»λὶ RT !----» 


Funktion: 


Die RETURN-Anweisung muß am Ende eines über GOSUB  aufgerufenen 
Unterprogrammes, einer TASK oder einer SEQ stenen. Bei der 
Ausführung wird dann das übergeordnete Programm nach dem GOSUB- 
Statement fortgesetzt. 


1000 GOSUB 2900 
2000 LET ΤΑΞΤΑ- 1 
2010 IF TA>O THEN RETURN 
2020 LET TA=TO 
2030 RETURN 
Hinweise: 
Bei Beendigung einer SEQuenz durch RETURN wird automatisch die 
Startzeile der SEQuenz (s. DEFINE-Anweisung) als nächste aus- 
zuführende Anweisung im Sequenz-Steuerblock festgelegt, bevor 
die SEQuenz stillgelegt (suspendiert) wird. 
Fehler: 


( KEINE) 
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---»» GEERT e---»! <ZN> !---> 


funktion: 


Mit GOTO kann eine unbedingte Programmverzweigung vorgenomme ber 
werden. 


Tee 
GOTO 1000 


Fehler: 


05 Programmzeile mit der gewünschten Nummer existiert nicht. 
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Aufruf: 
ο------ A 
+= KEN b. 
I φ------ + V *—- om vm br +- - - - - - - - - - - - - + φ------ + 
"owed +-->! [F le»! «Bedingung» !-->! THEN !--->> 
! Α Φ----φ φ------------- A +------ E 
ρ------------- D 
------------- + 
+-->! <Anwelsung> !--» 
I Φδ------------- + V 
>y-- + φρ--φ------------------------------------ )+---) 
l |#------ + A i À 
+---->)! «ΖΝ» !------- + | »------------- + ! 
— ded é ! +-->)! <Anwelsung> !--+ | 
! t------ + | ρ------------- + V I 
*-->! ELSE !--*+ GEET 
φ------ + l φ------ * A 
#----)1 <ZN> !------- + 
φ------ + 


Funktion: 


Das IF-Statement erlaubt die Formulierung von bedingten Aktıo- 
nen. Unter Bedingung ist folgende Anordnung zu verstehen: 


a) numerischer Ausdruck 
b) Ausdruck! Relationsoperator Ausdruck? 


Als Relationsoperatoren für String- und Zahlenvergeich sind 
zulassig: 


> großer 
< kleiner 
«δι A größer und gleich 


z< , «5 kleiner und gleich 
CH. Se ungleich 
= gleich 
Im Fall a): Falls der Wert des numerischen Ausdrucks 


Null ist, gilt die Bedingung nicht erfüllt, sonst als erfullt. 


Falls die Bedingung erfüllt ist, wird der THEN-Teil ausgeführt. 
Falls die Bedingung nicht erfüllt ist, wırd das nächste State- 
ment im Programm ausgeführt oder die im ELSE-Zweig vorgesehene 
Aktion. 
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a) 1000 IF A«»0 THEN 2000 
entspricnt 
1000 IF A THEN 2000 
b) 1010 IF A<-8 THEN 2020 ELSE A=-100 
c) 1029 IF AS$«»CHR$(12]*8$ THEN PRINT "UNGLEICH" 
d) 1030 IF A»8 THEN [F A»C THEN 3000 


Beim Vergleich zweier Strings bedeutet die "größer"”- Aussage, 
daß der ASCII-Code als Hexzahl betrachtet größer ist. Ist der 
kleinere String identisch mit dem linken Teilstring des  Ver- 
gleichsobjekts, dann gilt der längere String als größer. 


Es gilt 2.8.: - 


NET > ΑΓ 
"b^ » "Cxxxx” 
“ABCO? < “ABCDEFG” 


Fehler: 


08 Inkompatible Datantypen in den Vergieichsausdrücken 


1 Unerlaubte Relation im Bedingungsausdruck 
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Aufruf: 
------ + *+------ + 
+-->)! €ZND !--» *--)1 STOP !--» 
| d wë e e e wm mi * V ! φ------ + V 
---}» ρ---γϑ» +---) 
l A I φ---- Α 
ρ------------- + φ---λι ST 1---+ 
#-——--- + 
Funktion: 
Das STOP-Statement legt Abbruchstellen innerhalb eines Pro- 
gramms fest. Bei der Ausführung kehrt der [nterpreter grund- 
satzlich in die Kommandobetriebsart zurück, auch wenn der Ab- 
bruch innerhalb eines BASIC-Unterprogramms erfolgte. 
Beispiel: 
1000 IF A=0 THEN STOP 
Fehler: 


(keine) 
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85.1.8 END 
Aufruf: 
φ------ + φ----- + 
--->! «ΖΝ» !---5! END !---> 
φ------ + φ----- + 
Funktion: 


Das END-Statement stellt das letzte Statement eines  BASIC- 
Programms dar. Es ist allerdings nicht notwendig, wenn das 
Programm über ein STOP oder RETURN-Statement beendet wırd 


Beispiel: W 
31000 END 

Fehler: 
03 Hinter ENO existiert eine weitere Programmzeile 
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6.2 RECHEN-/SPEICHERANWEISUNGEN 


8.2.1 DIM 
Aufruf: 
φ------ + 
+-->! «ΖΝ» !--» 
I *#------ + V ν----- + 
---»» *--->! DIM !---»» 
! A φ----- + 
φ------------- + 
φ----------- + 
A -------- + +---» | «Ausdruck ! et 
»»-*--»! «Name»? !-»! ( !-»5! 1 > Ί--λο----------------- pesci δ 15.6,“ 
Α ε-------- » φ---» φρ----------- + i φρ----------- + A ----φ ! 
! «Ausdruck ! ! 
I $-->)i 2 > !--> ! 
! ---'η φ----------- + | 
φρ------------------------- I, Ίέ---------------------------5----------- + 
φ---} 
Funktıon: 


Mit der DIM-Anweisung können ein- oder zweidimensionale Felder 
vom Datentyp "REAL" oder "STRING" angelegt werden. Bei Vektoren 
legt der Wert von "Ausdruck!" die Länge (Anzahl der Elemente) 
fest. Die Indizierung geht hierbei von 0 bis zur angegebenen 
Dimensionszahl. Eindimensionale Felder werden grundsätzlich als 
Spaltenvektoren angelegt, was bei Anwendung des Matrix-Vektor- 
Kalküls (s. MAT) zum Tragen kommt. 


Bel Matrizen legt der Wert von ^Ausdruck!" die Anzahl der 
Zeilen fest, während sich die Anzahl der Spalten aus dem Wert 
von "Ausdruck?" ergibt. Auch hier beginnt die [ndizierung bel 
0, wobei allerdings im Rahmen des MAT-Statements nur die Teil- 
matrix ab Element 1,1 benutzt wird. BASIC legt die Felder 
zeilenweise ab, d.h. zuerst wird die "nullte’-Zeile, dann die 
erste usf. abgelegt. 


A Bei der erstmaligen Anlage von Feldern werden alle Elemente 
gelöscht (Wert 0 bei REAL-, Leertext bei STRING-Feldern). 


Sofern der verfügbare Arbeitsspeicher keine physikalische Be- 
grenzung darstellt, beträgt die maximale logische Dimension 


- numerische Vektoren: 8190 
- numerische Matrizen: 126 mal 126 
- Stringfelder: 255 Elemente 
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TET 
1000 DIM X1(10),A(N,N),Xa$(2,10) 
1010  INPUT N 
1020 DIM X1(N) 
Fehler: 
13 Dimension zu groß 
33 Redimensionierung nicht möglich, Orıgınalfeld zu klein 
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Mit der DIM-Anweisung können bereits vorhandene Felder redimen- 
sioniert werden. Hierbei darf das redimensionierte Feld jedoch 
nicht größer werden, als bei der erstmaligen Anlage angegeben 
wurde. Die Umwandlung von Vektoren in Matrizen und umgekehrt 


ist möglich. Bei der Redimensionierung werden die Feldelemente 
NICHT gelöscht. 


Aufruf: 
δ----- + 
ο------ + +-->! LET !--» 
+-->! <ZN> !--+ ! t----- + ! 
! ρ------ + V ! V 
u +-=-)+--- -- -- - --- >»+---)) 
! Α ! A 
φ------------- » I +---+ ! 
φρ---»ι L !'---e 
TEE 
ρ------------ + 
+-->! «Variable» i!----+ 
! Φ------------ * ! 
l γ 
kass mmm >* 
! I V +*+---+ φ------------ + 
λλ-»--» #--->! = !--5! «Ausdruck» !--+---) 
A ἱ φρ----------- + À t---+ .------------ + ! 
! ! ! <Ausgabe- ! 
! +-->! funktion» !----- * .---» ! 
' ρ----------- + +--| ; Ἱ--ν ! 
I [ dioec eco Ἡ I I 
i i I I 
: V +--- + ! I 
+ - -- +... 2-2 LL a φ6-!., Ίςέ-»έ-------- * 
φ---» 
Funktion: 


Die LET-Anweisung erlaubt die Formulierung von Wertzuweisungen 
und stellt damit das zentrale Statament dar. Die Ergebnisse von 
numerischen oder String-Operationen können Variablen des glei- 
chen Typs zugewiesen werden. Numerische Werte können 
darüberhinaus auch an Spezialfunktionen wie 


CNT Zähler 

DAC Analogausgabe 
pour Binärausgabe 
PUT Byteausgabe 


COMMAND Kommandowort-Ausgabe an seriellen Kanal 
TUP/TDOWN (Realitiv-) Zeıtgeber 

TIMES Tageszeitgeber ) wenn implementiert! 
DATES Datumsgeber ) 


übergeben werden. 
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1000 A min = B max, C=za+B (X+*+LN(X2*X3)), AS= AB U 
1920 FF$=CHRS(12) : BS=z=FFS+ "ABCOE *CHRS(27) 

1030 LET DAC(N)=K*Y1, DOUT(2)=1, PUT(128)=127 
1040 TIMES=32 08:21:35" : DATES="22:06:85° 


Hinweise: 
Zur Vermeidung von Mehrdeutigkeiten bei der Eingabe des Schlüs- 


selwortes ἱ (ΕΤ) sollte nach dem Schlüsselwort grundsätzlich ain 
Leerzeichen folgen: 


Beispiele: 

Eingabe: Wirkung: We 
LA z 1 LA z1 

L As 1 LET A si 

LETA=1 LETA si 


Im Zweifel die Zeile auslisten, ob Variablenname bzw. Kurzform 
richtig erkannt wurde! 


Fehler: 
07 Anweisung nicht korrekt abgeschlossen 
08 Inkompatible Datentypen 
10 Ausgabefunktion auf rechter Seite oder: 


Einlesefunktion auf linker Seite 
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6.2.3 MAT 
Aufruf 
ρ------ + 
+-->! «ΖΝ» !--+ 
l +------ + γ bosseg + EE + +---+ 
Fre +-->! MAT !--»! <Feldname) !--5! = !--->> 
! A *+----- + φ------------ + +---+ 
ρ------------- + 
------ + 
+-->! ION !----- . 
[ omm mm » I 
! φ----- + V 
+-->! ZER !----- δ----------------------- + 
d -— + À i 
I t----- + ! d 
+-->! TRO !----- * ! 
l + < w Sege + | 
I ουσ ee ey as DA SSSR as TSP ὦ <a, as aa * V 
>>-+-->! <Matrix-Ausdrucx> !-------------- λ»----} 
I ρ------------------- * À 
I $----- + φ--------------------- A I 
+-->! TRN !---! (<Matrix-Ausdruck>) !---* 
$----- + φ--------------------- + 
φ---ν» E a wm zm o wm wm ep ep mp em o op wm vm e mm mm we + t---> 
==>! [ !--1 «Matfix-Ausdruek» 9-240. Έναν 
l φ----. e wm om mm om e mp 2.2. mp mm mp mp mp vm P + TEEN ! 
| φ------------ + V 
Matrix- ---,x+*---+----- I «Feldname» !-------------------- — GÀ 
Ausdruck: A ! *+------------ E A | 
! ! ρ--- ρ---------- » CEET ! ! 
|. ΣΕ D o dextoXekalary TEE Eeer ang ena κ 4 
l — + Ee = aime wé m mm + φρ---ο l 
! ' 
I φ---» ! 
! *+---! + 1<--+ l 
! I .---} d ! 
! V ---» ! ; 
*#-------- »+<--| - Ἱέ--νί------------------------ D 
A +---+ ! 
I be se bb I 
PET ZC TI ae an 
I $ < = s & I 
I imma l 
— ETE. 
CEET 
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Das Matrix-Statement MAT erlaubt die direkte Berechnung von 
MatrixVektor-Ausdrücken und stellt damit das Pendant zum LET- 
Statement für skalare Ausdrücke dar. 


Neben der sehr kompakten Formulierung von Matrix-Ausdrücken 
liegt der Hauptvorteil des MAT-Statements in der deutlich höhe- 
ren Rechengeschwindigkeit gegenüber der Programmierung "zu 
Fuß". Die Geschwindigkeitssteigerung liegt zwischen Faktor 10 
und 30 und erklärt sich vornehmlich damit, daß für das Aufbre- 
chen des Matrixausdrucks im Vergleich zu den unabdingbaren 
Rechenoperationen wenig Zeit aufgewendet und keine explizite 
Indexrechnung gemacht wird. 


Damit empfiehlt es sich für den Anwender, seine Probleme zu 
vektorisieren, um eine Beschleunigung des Rechengangs zu errel- 
chen. 


Bei der Bearbeitung des MAT-Statements wird zunächst die rechte 
Seite unter Berücksichtigung der Syntaxregeln und der Dimensio- 
nalität der beteiligten Operanden ausgewertet.  Anfallende Zwi- 
$chenergabnisse werden selbständig angelegt. Oas auf der 
linken Seite stehende Ergebnisfeld wird entsprechend redimen- 
sioniert, es sei denn, daß auf der rechten Seite die Sonder- 
funktionen IDN, ZER oder TRO stehen. In diesen Fällen benält 
die Ergebnismatrix ihre ursprüngliche Dimensionisrung, da diese 
Funktionen nur eine Wertsetzung vornehmen. Die Zielmatrıx darf 
bei Multiplikation nicht auf rechter Seite stehen. 


Im Rahmen eines komplexen Matrizen-Ausdrucks können folgende 
Operationen und Funktionen vorgenommen werden: 


Addition und Subtraktion: 
Matrix/Matrix 
Matrix/Skalar 
Skalar/Matrix 
Vektor/Vektor 
Vektor/Skalar 
Skalar/Vektor 


Multiplikation: 
Matiix/Matrix 
Matrix/Spaltenvektor 
Matrix/Skalar 
Skalar/Matrix 
Zeilenvektor/Matrix 
Zeilenvektor/Spaltenvektor (Skalarprodukt) 
Spaltenvektor/Zeilenvektor (Dyad.Produkt) 
Vektor/Skalar 
Skalar/Vektor 
Element - Produkt 
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Hinweise: 
* Beim Skalarprodukt wird das Ergebnis im Element 1,1 einer 111- 
Matrix abgelegt. 

* Beim Elementprodukt werden Falder elementweise multipliziert, was 
insbesondere bei der Normierung/Skalierung von Meßwerten einen 
haufigen Rechengang darstellt, zB: 


1020 XE nor = SKV.XE + X off 


Matrix-Vektor-Funktionen 


Beispiel: 
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TRN 
IDN 


ZER 
TRO 


Transposition 

Die Diagonalelemente der Zielmatrix erhalten den 
Wert l,alle anderen Elemente den Wert 0. 

Alle Elemente der Zielmatrıx werden zu null gesetzt 
verschiebt die Elemente des Zielvektors (!) um eine 
Indexstelle in Richtung nulltes Element 


1000 REM Zustandsdgl. Eingrößensystem 


1010 
1020 
1030 


2000 
2005 
2010 
2020 
2025 
2030 


MAT XP = A*X + B*[U] 
MAT YsCT*X 
YzY(1,1)*0*U 


REM Mehrgrößensystem (zeitdiskret) 


VEC UzMADC(MO) 
MAT X1= P*X + Q*U 
MAT YzCT*X + D*U 
VEC MOAC(SO) Y 
MAT X=X1 


Weitere Beispiele siehe Programm MATDEM.BAS | 


12 
11 


30 
31 
32 
24 
3% 
39 


36 


37 


&.Q 


Undefiniertes Feld 

Feldtyp falsch (z.B. ein- statt zweidimensional, String 
statt Vektor) 

Unerlaubter Operand im MAT-Statement 

Falsche Reihenfolge von MAT-Operationen 

Inkonsistente Dimensionen auf der rechten Seite 
Zielfeld zu klein dimensioniert 

Vektor zu groß (2126) für MAT-Operationen 

Zielfeld auch auf rechter Seite des MAT-Statements 


Zuwenig Speicher für Ablage der Zwischenergebnisse 


Interner Konsistenzfehler (Entschuldigung !) 
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6.2.4 VEC 
Aufruf: 
ρ------ * 
+-->! «ΖΝ» !--*+ 
t φ------ + V φ----- + 
---»» *--->! VEC !---»» 
! A .----- 9 
Φ5------------ * 
Φ-------------- + -------------- * 
*-»! <Vektorname) !----------- * +“)! <Vektorname> !-------- * 
l Φ-------------- + ! I φ-------------- + ! 
I φ------ * V +---+ t φ------ * V 
9*9! MDAC !--» +=) E s 12»«e-9-»1- MDAC t =+ *-+*-+--> 
l |#------ D V ρ----------- » A +---+ A | ------ + V ρ--------- e X 1. ! 
! *-»!«Stellort- !-» [OM *-»!«Me8ort- !-» ! | 
Ne LLLI A | Vektor> ! | ann * A ! Vektor» ! 
*=->! MDOUT !-+ »----------- 9 I +#—>! MOIN !-+ »--------- E ! 
φρ------- + l ο------ + L d 
I ----. | ! 
! eb + Ic "0 
I A κ ἡ L ! 
ρ------------ * φί------- + ! 
A +---+ ! | 
t-! - <-> ! 
Φ----ϕ t---+ I 
----------------------- Γ ο E 
— + 
Funktion: 
Die VEC-Anweisung erlaubt die Formulierung von vektorwertigen 


Prozed-E/A-Operationen bzw. PI(0)-Reglerfunktionen. Ahnlich dem 


MAT-Statement werden durch das Schlüsselwort VEC alle in der 
Anweisung auftauchenden Variablennamen als Namen  eindimensio- 
naler numerischer Felder aufgefa93t (s. Vektor-Funktionen). 


Beispiel: 
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1000 
1010 
1020 
1030 


2000 
2010 
2020 
2030 


3000 


REM Einlesen des Meßvektors XE 

REM Der Meßortvektor MO enthält in seinen 

REM Komponenten die Einlesekanalnummern 
VEC XE:MAOC(MO) 


REM Ausgabe des analogen Stellvektors Y 
REM Der Stellortvektor SO enthält in seinen 
REM Komponenten die Ausgabekanalnummern 

VEC MDAC(SO) = Y 


VEC YsPI[(Y, E,ET,KP,KT, YO, YU, YD. AK) 
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MSR-BASIC 4.0 


24 


25 


29 


Unterschiedliche Dimension zweier Vektoren 


(Hardware-)Fenler beim E/A-Zugriff 


Fehler bei der Bestimmung der logischen Kanaladresse 


(gewunschter Kanal existiert nicht) 
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6.3 KOMMENTARANWEISUNGEN 


6.3.1 REM 
Aufruf: 
δ------ + ----- * 
+-->! ZN) !--» e»! REN ez >+ 
I $----- * γ I φ----- + γ 
---)+ +---)+ +---) 
I A N —| A 
ρ------------- + *+----)> IR !---+ 
*---*+ 
Funktion: 


Das REM-Statement erlaubt die Einfugung von Kommentaren ın o 
Programm. Es hat auf die Programmausfuhrung keinerlei Eınfluß. 


NS 


10 REM Nach REM können beliebige Zeichen folgen. 
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6.1.2 PUNKTBEFEHLE 


Aufruf 


Funktion 


ask +-- - - - - - - + 
«ΖΝ» !----- >! !----»! «Text» !---»5 
------ + +--- + δ-------- + 
MSR-Basic läßt ein führendes "."-Zeichen als Kommentar-Ein- 


leitung zu.Damit ist es möglich, zur Verbesserung des Listings 


WordStar-Punktbefehle zur Ürucksteuerung einzusetzen (insbeson- 
dere .HE, .FO, .CPnn,.PA). 


Beim Listen eines Programms auf Datei erzeugt 
Jeder Punkt-Anwaisung eine zusätzliche Zeile, 


MSR-BASIC aus 
die dr Programm- 


Zeile  vorausgeht und diese Zeile ohne Zeilennummer linksbündig 
darstellt. 

Ein derart generiertes Listen kann über WordStar ausgedruckt 
werden, ohne daß manuelle Modıfikationen erforderlich wären. 
QUELL-TEXT 

333 Stop 


1000 .HE TASK Messwerterfassung 


LIST-TEXT 


999 Stop 


.HE TASK Messwerterfassung 
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1000 .he TASK Messwerterfassung 
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6.4 DATEIBEFEHLE 


6.4.1 CREATE 


Aufruf: 
φ55---- + Φ-------- + 
+--->! <ZN> !---» +--->! CREATE !---» 
! $------ > V I +=-+---- -- + V γ------------- + 
---»» | += A t+--->! «Dateiname» !---) 
I A ! t--- -> À φ------------- + 
ρ--------------- * #--->i CR !------- + 
*#—-——---+ 
Funktion: ` J 
Das CREATE-Kommando legt eine neue Datei an, falls sie nicht 
bereits vorhanden ist. Der vollständige Dateiname kann als 
Stringvariable oder als Textkonstante angegeben werden und muß 
CP/M-Konventionen entsprechen. 
I . 
10 CREATE "B:DATEI.TST” 
oder: 
10 create "b:datai.tst^ 
Fenler: 


52  ungultiger Dateiname 
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6.4.2 OPEN 
Aufruf: 


e--->! <ZN> !--> t--->! OPEN !--. 


φ---φ φ--------------- + 


>>-->)! 


ρ---} ρ------------ * 
ı !--->! <Kanalnummer> !---5! , !---5! <Dateityp> | 


Φ---ν Zb o zm zm mp zm zm zm nn om op om vm wm em + ρ---ρ φ------------ * 


Das OPEN-Kommando ordnet einer Diskettendatei einen logischen 
Kanal (10 ... 19) zu, über die dann mit PRINT ON (Kanalnr.) 
bzw. INPUT ON (Kanalnr.! zugegriffen werden kann. 


Dateiname : entspricht CP/M-Konventionen, Extension muß ange- 
geben werden, Stringvariable oder Textkonstante 
Kanalnummer: im Bereich von 10-19 (integer), es konnen 10 LUs 
gleichzeitig geoffnet sein. 
Dateityp : 0 sequentiell write only 

1 sequentiell read only 


Beachten: Es kann nicht abwechselnd von einer Datei gelesen und 
auf sie geschrieben werden. Wenn die Zugriffsart wechselt, muß 
jedesmal vorher ein CLOSE und ein neues OPEM im entsprechenden 
Mode erfolgen. 


Über eine STATUS-Abfrage (Bit 7=1: Kanal offen, siehe Handbuch) 
kann vom Programm aus der Erfolg/Mißerfoig der OPEN-Anweisung 
abgefragt und ggfs. durch eine gezielte  Fehlerbehandlung abge- 
fangen werden. 


Beispiele: 


a) OPEN "B:DATEI.TST^,15,0 
b) 1010 OPEN DatNam$ , TxtLU,1 
1020 IF BIT (7T, STATUS(TxtLU, 1)) =0 THEN 2000 


2000 PRINT "Datei ` ; DatNam$; "nicht vorhanden” 
Fehler: , 
52 ungültiger Dateiname 


56 LU existiert nicht 
57 LU bereits geöffnet 
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6.4.3 CLOSE 


Aufruf: 
φ------ - φ------- * 
#--->! «ΖΝ» !---» #---)! CLOSE !---* 
i φ------ + V I φ------- + V φ---------------- 
=== A *-->* +-->! <Kanalnummer> !---» 
| A I φ----- Α φ--------------- + 
ρ--------------- + +---)! CL !------ * 
*#—--—--- + 
Funktion: 
Schließen von Diskettendateien. Notwendig, besonders 
Schreibzugriff, um Dateien für CP/M zu aktualisieren und 
restlichen im Zwischenpuffer gespeicherten Daten auf File 
schreiben. 
Die CLOSE-Anweisung erlaubt die Angabe mehrerer oder aller 
schließenden Kanale. 
bal ei, 
CLOSE 15 
oder: 


1000 CLOSE 10,11,12 


bzw. 1000 ALL 


54 Diskette voli 


559 Fehler beim Schließen 
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w 


beim 
die 
ZU 


ZU 


8.4.4 DELETE 


Syntax: 
Φ------- + Φδ-------- * 
+--->! «ΖΝ» !---. +--->! DELETE !---* 
| φ------ + V I φ-------- + V φ------------ + 
---Ἂν .---»!ι ρ--»ὶ <String- I---) 
! A ! .----- E A I ausdruck» | 
δ--------------- * e---»! DEL !------ * ρ------------ * 
φ----- + 


Funktion: 


Die durch den Wert des Stringausdrucks bestimmte Datei wird ge- 
löscht. Falls die Datei nicht vorhanden ist, erfolgt keine 


Fehlermeldung. 
Fehlermeldungen; 
52 Ungultiger Dateiname 


MSR-BASIC 4.0 HANDBUCH 09/88 SEITE -70« 


6.5 STANDARDFUNKTIONEN 


6.5.1 ABS(X) 

A8S (X) 8etrag 
6.5.2 ACN(X) 

ACN(X) Arcuscosinus 
6.5.3 ASN(X) 

ASN(X) Arcussinus 
8.5.4 ATN(X) 

ATN(X) Arcustangens 
6.5.5 COS(X) 

COS(X] Kosinus 
6.5.8 EXP(X) 

EXP (X) Exponentialfunktion 


6.5.7 INT(X) 


INT(X) Entier-Funktion 
6.5.8 LN(X) 

LN(X) naturlicher Logarithmus 
8.5.9 LOG(X) 

LOG(X) dekadlscher Logarithmus 


8.5.10 SIN(X) 

SIN(X) Sinus 
6.5.11 SQR(X) 

SQR(X) Quadratwurzel 
6.5.12  TAN(X) 


TAN(X) -© Tangens 


MSR-BASIC 4.0 HANDBUCH 03/88 SEITE -71- 


8.6 STRINGFUNKTIONEN 


6.6.1 CHR$(x) 


CHRS$(x) : Der Wert von x wird als ASCII-Zeichen interpretiert 


Beispiel: (Form-Feed, ASCII-Code OCH) 
2020 EES = CHR$(12) 


6.8.2 VAL(X$) 


VAL(XS) : Die Funktion VAL wandelt ein durch den String X$ 
gegebene Ziffernfolge in einen Zahlenwert um. 


Beispiel: 
1000 Zahl$ = “123” 
1020 PRINT VAL(Zanl$) AS 10F3 
liefert: 
123.000 
Falls die Ziffernfolge unkorrekt ist, erfolgt die 
Fehlermeldung ERROR 09. 


6.6.3 ΙΕΝ(Χ5) 


LEN(X$) : Die LEN-Funktion liefert den Wert der Länge des 
Stringausdrucks. 


Beispiel: 
100 Zahl$=z 123 ° 
110 PRINT LEN(ZahlŠ) AS 8I 


liefert: 
3 


Zum Abspalten von Teilstrings aus einem Quellstring stehen in 
MSR8ASIC die bekanntan Funktionen: 
6.6.6 LEFT$(QS,N) 


LEFTS$(Q$,N): Erzeugt aus den ersten N Zeichen von Q$ einen 
Teilstring 


6.8.5 MIO$(Q$,N,M) 
MIOS(Q$,N,M): Erzeugt einen Teilstring aus dem Quell-string 
Q$,der beim N-ten Zeichen beginnt und M Zeichen 
umfaßt 


6.6.6 RIGHTS(Q$,N) 


RIGHTS(QS$,N): Erzeugt aus den letzten N Zeichen einen Teil- 
string zur Verfügung. 
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6.6.7 INSTR((N.)0$,2$) 


Die INSTR-Funktion prüft einen Quellstring ab einer bestimmten 
Position auftritt, und liefert im positiven Fall die Position das 
Suchstrings innerhalb des Quellstrings. 

Syntax: 


a) INSTR (<Quellstring> ,<Suchstring>) : Suche beginnt bei erstem 
Zeichen des Q$ 


b) INSTR («Startposition»,«Quellstring»o, 
<Suchstring>): Suche beginnt bel der 
spezifischen Startposition 


w 
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Typen 
Parameter aine 4-B8yte- 
meter-Adresse (80x86: 


sind Variable und Ausdrucke zugelassen, 


6.7 SONSTIGES 
8.7.1 CALL 
Aufruf: 
*+------ + *-—----- + 
e-->1 «ZND !<-+*- *==>x! CALL '--» 
! +---- -- + V ! ------ + V *---------- + 
See? += * *--»! Nummer» !--->> 
! Α l φ----- Α φ---------- + 
t=------------ € pest. CA !----. 
Φ----- 
ρ---} φρ------------- + TEEN 
>>-->! ( !--»*----! <Parameter> !------------ Sëeszh ) T» 
ρ---» Α ρ------------- + l φ---» 
! φ---» l 
---ς----. I, ἐς------------------ + 
φ---» 
Funktion: 
Das Assemblerunterprogramm mit der angegebenen Nummer wird 
aufgerufen. 
Parameter-Übergabe: 
Bei Aufruf des Unterprogramms enthält das AL-Register (280: A- 
Register) die Anzahl der übergebenen Parameter, während die 
Parameter selbst der Reihe nach im Stack übergeben werden 
(letzter Parameter liegt oben auf dem Stack). Als Parameter- 


wobei für jeden 
Information übergeben wird, die die Para- 
Offset-Adresse ın Bezug auf DS-Register) 


und einen Typdeskriptor enthält: 


< < < =< < < =< < κ. 


Der Typ-Deskriptor ist 


Bit 7-1: Als Parameter 
=0: Als Parameter 

Bit 0-1: Als Parameter 
«0: Als Parameter 

Falls Bit 7:0 (Variabl 
Bit 150: Skalare 

:1: Feld(-El 
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-— — e ap wm e a m < m «» m «Ὁ < «ο 
< o ep < op - op «ο «Ὁ omo < m a 


folgendermañen aufgebaut: 
wird ein Ausdruck übergeben 
wird eine Variable übergeben 


wird 
wird 


ein String übergeben 
eine Gleitkommazahl übergeben 


enübergabe): 
Variable 
ement) 
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we e- 


Beispiel: 


MSR-BASIC 


Zur ordnungsgemäßen Rückkehr in den MSR-BASIC-Interpreter kann 
der RET-8efenl der CPU benutzt werden. 


Im UP sllte der Anwender Anzahl und Typ der Parameter überprü- 
fen. Insbesondere ist zu testen, ob der Ergebnisparamater 
korrekt als Variable übergeben wurde (Beispiel s.u.!). 


Die Nummer des Assemblerunterprogramms darf zwischen Ὁ und 25% 
liegen. Die Verbindung zwischen Interpreter und Assembler- 
unterprogrammen erfolgt über eine zu erstallende Sprungtabelle 
(Adresse CALLTB in Systemkonfigurationstabelle SYSCB,  SYSPCxx 
ο.ᾱ.), die folgenden Aufbau hat: 


CALLTB+ 
«0 Anzahl der UPs 
+1 Nummer (in Hex), LSB und MSB der Startadresse des UPs 
+4 dito 


Nähere Hinweise bitte der Installationsanleitung entnehmen. 


CALL 1(A(0),A$,10*Y) 


Im UP kann die syntaktische Korrektheit der Parameter-Übergabe 
durch folgende 8efenlssequenz durchgeführt werden: 


UP 1: 
CMP AL ,3 
JN2 ERR23 
POP AX ; ` 10*Y”-Adresse+Typ 
POP 8x 
TEST AH,000000018 ; Parameter-Datentyp 
ΝΖ ERRO1 ; String ist falsch 
POP AX ; "AS$"^-Adresse«Typ 
POP 0x 
TEST AH,000000018 ; Parameter-Datentyp 
JZ ERRO1 ; Zahl ist falsch 
POP AX ; "A(0)"-Adresse+Typ 
POP Cx 
TEST AH,100000018 ; Parameter-Datentyp 
JNZ ERRO!1 ; Ausdruck und/oder String 


ist falsch 
; Parameteradressen in CX, OX, BX 


RET 


ERRO1: MOV AL,1 
JP TERROR ; MSR-8ASIC-Fehlerneahnadlung 
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01 Falscher Parameter-Typ (z.B. String statt Zahl) 
15 Unterprogramm mit der gewünschten Nummer ist nicht vorhanden 


23 Parameter-Anzahl nicht korrekt 
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T. KOMMANDOS 


7.1 SYSTEM 
Aufruf: 
φ----- + 
---)1 SYS !---»5 
φ5---- + 


Funktlon: 
Verlassen des Intərpreters 
Rückkehr in das Betriebssystem 


š . : 
Beim Verlassen des Intarpreters wird das MSRBASIC-interne Echtz 


betriebssystem abgeschalten und das [nterruptsystam des Betriebssy- 
stems restauriert. 


= mp — < < ver < < < m < < < < < wm — — < — mm wm < «Ἡ < — c < — — em < — «Ἡ ep < < < ep <& < < «Ἡ wm < — — < < < wm em < < < — zm < < ep κ — — — mm — — em — — — — wm — 


T.2 FREEZE 
Aufruf: 
Φ----- + 
---)! FRE !---» 
φ----- + 
Funktion: 


Entfernung gelöschter Programmteile aus Speicher ("Entrümpe- 
lung’) 

Schutz des BASIC-Programms ("ainfrieren") 

Ankopplung eines in PROMS abgespeicnerten 8ASIC-Programmes 
Freigabe des Echtzaeitbetriebs 


Hinweise: 


Das FREEZE-Kommandos gibt die Echtzeitbetriebsart frei (Aus- 
führung von ACTIVATE-TASK-Anweisungen etc. zulässig), was aber 
aus Sicherheitsgründen ein Verbot des gleichzeitigen Editieren 
von Programmzeilen nach sich zieht. 


MSR-BASIC-4.0 HANDBUCH 09/88 SEITE -77- 


Aufruf 
φ---------------- + 
*£===>! “¿Qatalnamex” !----- + 
KEE + | φ--------------- + V 
---»! LIST !---5!------------------------- >+---)) 
+-- rm + ! Te Bee en E E + A 
*--->! ON(<Kanalnummer>) !-» 
Φ------------------- + 
λλ-»----------------------------------------------------- >+---) 
t +=-- - - - - - - - - - = -- + A 
κατ €Startzsiléo Immun ora eem d 
—— - - - -- - - - > -- + I +---+ A 
e--)1 , ἵ--δο------------------- + 
+--- + I φ------------ D A 
---»! <Endzeile> !--* 
φ------------ + 


Funktion: 


Ausgabe des BASIC-Programms auf Bedienkonsole, E/A-Kanal n 
(z.8. Drucker) oder Datei, wobei eine Startzeile und Endzeile 
spezifiziert werden kann. Beim Aufruf "LIST ON ..." geht der 
Interpreter in die TransparentbetriebDsart (s. LOAO0-Kommando) um 
die Verbindung zu einem Hostrechner zu ermöglichen ("Virtuelles 


Terminal’). Diese Betriebsart wird bei Eingabe von `A verlassen 
und das Auslisten des Programms auf den angewählten Kanal 
vorgenommen. 


Beim Auslisten wird versucht, die Struktur des  Anwenderpro- 
gramms möglıchst deutlich wiederzugeben. Daher werden Zeilen, 
die die Befehle 

END, REM, RETURN, STOP, WAIT 


enthalten, um zwei Oruckpositionen nach links gerückt und das [ῃ- 
nere von Laufanweisungen um 4 Leerzeichen nach rechts verschoben. 
Grundsätzlich wird die Normalform eines Statsments ausgedruckt, 
auch wenn der Benutzer ursprünglich die Kurzform eingegeben hat. 


8eispiel: 
1000 REM Demonstrationsprogramm 
1010 OIM X (10,10) 
1020 FOR I=1 TO 10 
1030 FOR Js! TO 10 
1040 PRINT ^Element";I AS 21;^,^,J AS 2I 
1050 INPUT X(1L,J) 
1060 NEXT J 
1070 NEXT I 


1080 STOP 
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Hinweise: siehe aucn Abschnitt "Punktbefehle” und 
Abschnitt "Editor-Funktionen" 
Hinweise: 


In einer MS-DOS- bzw. CP/M- Umgebung kann das Programm auch auf 
eine Floppy-Disk-Datei ausgegeben werden. Der Dateiname muß D0S- 
bzw. CP/M-Konventionen entsprechen (Kleinbuchstaben werden als 
Großhuchstaben betrachtet) und darf keine Extension aufwelsen, 
da die Datei automatisch zu '"Dateiname.BAS" angelegt wird. Eine 
evtl. bereits vorhandene Datai gleichen Namens wird in "Datei: 
name.BAC" umbenannt (automatisches Back-Up). 
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T.& LOAD 


Aufruf: 
ΛΞ - +2. e * 
t--->! ON(«Kanal») '----- * 
t=- zm zm e * | φ------------- + V 
---»! LOAD !---λ»----------------------5- y+---> 
Φ------ + I φ--------------- D A 
*---»! *4Dateiname»" !---» 
Φ--------------- + 
Funktion: 
MA Einlesen eines BASIC-Programmes entweder 


- von Bedienkonsole 
- von beliebigem Peripheriegerät auf Kanal n 
- von Floppy-Disk (nur bei CP/M) 

und ablegen in Arbeitsspeicher. 


Zu Beginn des Ladens erscheint als Triggersymbcl ein !-Zeıchens 
auf der Konsole. Nach dem Einlesen einer Programmzeile wırd 
eine Zifferanzeige am Bildschirm um 1 erhöht (modulo-8-Zähler). 
Nach dem Einlesen der letzten Programmzeile bleibt die Anzeige 
stehen, bis nach dem vollständigen Übersetzen des Programmklar- 
texts in den MSR-BASIC-internen Zwischencode die READY-Meldung 
kommt. 


Falls der "ON(...}"-Zweig aktiviert ist, geht der Interpreter 
zunachst in eine Transparentbetriebsart, d.h. er stellt soft- 
Μ4ΓΘΠάΘΙ9 die Verbindung zwischen der Bedienkonsole und dem 
angewahltaen Peripheriegerät her. Ist dies ein (Host-)Rechner, 
karn er in dieser Phase des LOAD-Kommandos über das Terminal 
des MSRBASIC-Rechners nahezu beliebig bedient werden ("Virtuel- 
les Terminal’). Die Eingabe von ^A veranla8t den  MSRBASIC- 
Interpreter, an den Hostrechner ein RETURN-Zeichen zu schicken 
und damit das Zusenden eines Programms auszulösen.  MSRBASIC 
geht unmittelbar danach in die Ladebetriebsart über. Das Laden 
wird abgebrochen, wenn ein 2-Zeichen eintrifft oder wenn mehr 
als $s kein Zeichen mehr kommt (Time-out). 


| “Ἂ Das Laden kann von der Konsole über `C abgebrochen werden, ohne 
| daß bereits eingelesene Programmzeilen verloren gehen. 


Unter CP/M 2.2 ist die Betriebsart als virtuelles Terminal nur 
nach Installation entsprechender Kanaltreiber moglich (s. In- 
stallationsanleitung), unter CP/M plus (3.0) eignet sich hier- 
für die AUX-Schnittstelle. 


Werden beim Übersetzen in den Zwischencode Syntaxfehler er- 
kannt, so wird die fehlerhafte Zeile gemeldet. Alle bereits 
eingegliederten Zeilen bleiben erhalten, alle folgenden Zeilen 
gehen verloren. 
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7.5 NEW 
+----- * 
Aufruf: ---»! NEW !---» 
φ----- + 
Funktion: 


TASKs stillegen 

Programm löschen 

Daten löschen 
NOFREEZE-Betriebsart einstellen 


mp ep — ο... m nn --- -Ἡ em «Ὁ «Ἡ we wm wm wm nn m m wm — a - wm 


1.6 NOFREEZE - 


φ------ + 
Aufruf: ---»! ΝΟΕ !----> 
Φ------ B 
Funktion: 
TASKs stillegen 
BASIC-Prom abkoppeln 
Programmschutz aufheben 
T.T MFREE 
φ-------- + 
Aufruf: --»! MFREE !----> 
φ-------- + 
Funktion: 


a) in NOFREEZE-Betriebsart 
Speicherentrüumpelung 
Löschen des Oatenspeichers 
Angabe des freien Speichers 


b) in FREEZE-Betriebsart 
Angabe des freien Oatenspeichers 9 
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Aufruf: 
ρ----- + 
--->! RUN !---Ρ»---------------------- >+---) 
ρ----- + ! ρ-------------- * A 
+--=>! «Startzeile» !---» 
φ-------------- * 
Funktion: 
Starten eines  BASIC-Programms bei der ersten Zeile oder der 
Startzeile. Die Symboltabelle wird in beiden Fällen nicht ge- 
loscht. 
b ———————————————— 
T.9 SAVE 
Aufruf 
φ------ο--------- + 
%---)! "<Dateiname)” !------- , 
φ------ + ! φ--------------- » ν 
“πανί SAVE beeRb-e2aem mtm tim tm o Rm mt t a n d )+---)) 
t-- ---- + ! ρ------------------- + A 
*---»! ON(<Kanalnummer>) !---* 
bz zm zm o 222-2 2022 2. 202. - + 
>) -+---- --- - 422-242 42222-422222 0442... 00. 0. 1... ---------- >+--) 
| φ-------------- + A 
+-->! «Startzeile» Ἱ--δε------------------------------- + 
Ee + I — 9 A 
#--) 1 , Ἱ-δι------------π------ H 
t---+ ! ρ------------ + À 
+-->! <Endzeile> !--» 
φ------------ + 
Funktion: 
Ausgabe des im Speicher befindlichen BASIC-Programms auf Be- 
i dienkonsole oder Peripheriegerät, ähnlich wie LIST-Kommando. [Im 
A Gegensatz zum LIST-Kommando wird das Listing nicht 
strukturiert. 
: Laser 


1000 R Demonstrationsprogramm 
1010 OIM X(10,10) 
1020 F I=1 TO 10 


1030 F J=ı TO 10 

1040 P “Element”; I AS 21;^,^;J AS 21 
1050 I X (I, 2) 

1060 N J 

1070 N I 

1080 STOP 
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7.10 VCL 
Φ----- * 
Aufruf: ----)! VCL !---» 
φ----- + 
Funktion: 


- Löschen aller Anwendervariablen und -Zeitgeber 


Das VCL-Kommando ist aus Sicherheitsgründen nur in der NOFREEZE- 
Betriebsart (kein Realzeitbetrieb) zulässig. 


w 
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8. KOMMUNIKATION 
8.1 ÜBERSICHT 
8.1.1 AUSGANGSSITUATION 


Die Kommunikationsfähigkeit von Automatisierungsgeräten untereinander ist 
angesichts der CIM-Zielsetzung ein Gebot der Stunde. 


MSR-BASIC hat von Anfang ein sehr offenes Kommunikationskonzept mit 


- freier Wahl und Konfigurierung der Schnittstellen, 
- leistungsfähigen Kanaltreibern auf Interruptbasis, 
- integriertem Terminal-Modus 
- integrierten Up-/Download-Fähigkeiten und 
- leistungsfähigen Sprachmitteln wie 
"PRINT ON’-, "INPUT ON” -Anwelsung und 
"INCHAR$^-, "STATUS^- und "COMMAND" -Funktionen, 


zur Verfügung gestellt. 


8.1.2 ERWEITERTE KOMMUNIKATIONSFUNKTIONEN 


Ab Revision 3.1. (Sommer 87) werden diese Fähigkeiten ausgebaut durch das 
Kommunikations-Paket  MSRCOM (als eine Standard-Option) für  MSR-BASIC- 
Systeme, das den Aufbau von MSR-8ASIC-Netzwerken durch folgende  High- 
Level-Funktionen unterstüzt: 


- Zugriff auf externe Proze8kanale (Remote I/O0-Access)] 
- Zugriff auf externe Variable 
- Protokollverwaltung 


Diese Funktionen sind vor allem für jene Einsatzfälle hervorragend ge- 


eignet, bei denen eine Zentralstation auf verteilte Vor-Ort-MSR-Rechner 
bidrektional zugreifen soll. 


Das Kommunikationspaket MSRCOM ist in Anlehnung an das OSI-ISO-Schich- 
tenmodell für offene Kommunikation streng modular ausgelegt. 


0.h. daß der Austausch einer unteren (Software-)Schıcht die oberen 
Schichten nicht berührt. 


Durch die Bereitstellung geeigneter Kanal-Treiber für serielle Schnitt- 


stellen, wird die Vernetzung über diese preisgünstigen Standardschnitt- 
stellen besonders unterstützt. 


Im Sinne der Offenheit zu anderen Hard- und Software-Welten beinhaltet 


MSRCOM sein Turbo-PASCAL-Paket MSRLINK, mit dem der Einsatz eines Stan- 
dard-PCs als Master unterstützt wird (siehe separate Beschreibung). 
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8.1.3 KONFIGURATIONEN 


MSRCOM unterstützt prinzipiell folgende Konfigurationen: 
a) 1-Master-1-Slave-Konfiguration (Bild 1) 


b) 1-Haster-n-Slave-Stern-Konfiguration (Bild 2) 
c) 1-Master-n-Slave-Bus-Konfiguration (Bild 3) 


Der Konfigurationstyp bestimmt den Umfang und die Art der MSRCOM-Module, 


die im konkreten Fall eingesetzt werden (s. Abschnitt Installation/Kon- 
figuration). 
φ------------ + φ------------ + Φ----------- + 
l MSR-BASIC- ἱέ------ yt MSR-GASIC- T<- =- -»! - Techn. ! 
! Master ! ! Slave ! ! Prozeß l 
φ------------ * δ------------ D ρ----------- E 
Schaubild 8-1: 1-Master-!-Slave-Konfiguration 
δ------------ * 
! MSR-BASIC- |! 
! Master | 
Φ------------ + 
ti | 
φ------------------ + I φ----------------- + 
! ! ! 
γ y y 
δ------------ + ν------------ D ρ------------ + 
I MSR-BASIC- ! I MSR-BASIC- ! ! MSR-BASIC- ! 
! Slave | ! ! Slave 2 | νο 7 Slave n ! 
$-———————----- e φ------------ * φ5----------- D 
I i I ! I | 
φ----------- E φ----------- + Φδ----------- ^ I 
I Techn. ! I Techn. I Techn. ! - 
!  Proze8 ! I Prozeß ! ! Prozeß ! 
φρ----------- + Φ----------- D Φ----------- + 


Schaubild 8-2: Stern-Konfiguration 
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! MSR-BASIC- ! 


! Master ! 
Ess zm zsm zs zm 2 mm mm zm zm e 
I 
p — < < < — w m ο. zm -. - zm ep zm ap *e———————————— e 
I ' I 
V V V 
ii ?.?. + E zm zm zm zm > ---- + Φ5ΞΞ--------- + 
I MSR-8ASIC- | I MSR-BASIC- | I MSR-BASIC- | 
! Slave {| ! ! Slave 2 ! ! Slave n I 
LOSS + ν------------ * φρ------------ * 
I I I I I I 
to o a u. m -Á + ν----------- * #--—- - - . - --.-.- + 
! Techn. ! ! Techn. ! I Techn, ! 
! Prozeß ! ! Prozeß ! ! Prozeß | 
Φ----------- + φ----------- + ΦΞ--------- + 


Schaubild 8-3: Bus-Konfiguration 
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8.2 KOMMUNIKATIONS-MODELL 


Die Kommunikation in MSR-BASIC erfolgt noch einem vereinfachten 
Schichten-Modell im Sinne des I[SO-OSI-Standards. 


Folgende Ebenen sind implementiert bzw. werden unterstützt. 


"Ebene T:^ »---------------------- + 
! ! application layer 
!  (SENO-/RECEIVE) ! 
! (Remote Ε/Α) ! 
ε---------------------- E 
A | 
+-- I V --} 
I "Ehane δ: "ee EE E E E + ! 
! I  Formatkonvertar ! ! representation layer 
! ! ' ! (kann entfallen) 
I φρ---------------------- + i 
GET A ! --+ 
y 
"Ebene πι rennen * session layer 
I  Protokoll-Verwalter |! transport layer 
I Netzwerk-Verwalter ἱ network layer 
Φ-------------------- D 
A 
I V 
Ὁ: "ee T. s s * 


A ! 

I V 
"Ebene 1:"  e-———— m + 
I Übertragungs-Kanal | 
! (RS232/IEC/BIT8US) | 
δ---------------------- » 
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8.3 ANWENDER-EBENE 


8.3.1 MASTERFUNKTIONEN 


Im MSRBASIC-Master stehen dem Anwender für die Kommunikation die 
- Variablen-Zugriffsfunktionen “SENO” und "RECEIVE", 
- E/A-Zugriffsfunktion "ADC", “DAC”, "DIN^, “DOUT”, “CNT ` 
bzw. "RAOC^, ^ROAC^, "ROIN^, "ROOUT^, "RCNT" 


zur Verfügung. 


8.3.1.1  RECEIVE-FUNKTION 


Ihre Syntax lautet: 


<Zıel-Variable> = RECEIVE(<Quellbezeichner)>, <Steuerwort),<Statuswort>) 


Bedeutung der einzelnen Parameter: 


em ep mp < < << < mp zm < mp — «ο «ο --- ο ο ο om wm < «αν «αν wm < 


Quellbezeichner : Stringausdruck, der den Namen jener Slave-Variablen 
liefert, deren Momentanwert angefordert und an die 
Zielvariable übertragen werden soll. 


Der Name einer Slavegröße setzt sich zusammen aus: 


- Stations-Nr. des Slaves (ggfs.) 
- lokaler Variablenname 


Syntaxdiagramm: 
φ---------- + 
I Stations-! 
*-»! Nummer EA 
ERE Zn 
I |#---------- * I 
l y φρ---------------- D 
-+---------------- +----)! Variablen-Name !--» 
ρ---------------- D 
Steuerwort: Numerische Größe, die auf 3 Bit gerundet wird. Die 


letzten vier Bits legen die Slaveadresse fest (lin 
der Regel Adresse 0). 

Ist das 8.Bit gesetzt (Steuerwort > 127), werden 
zum Zweck der Fehlersuche alle Bytes im Hex-Format 
angezeigt, die zwischen dem MSRBASIC-Master und dem 
Slave ausgetauscht werden. 
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Außerdem lösen in dieser Betriebsart alle Fenler, 
die bei der Ausführung von SEND/RECEIVE auftreten, 
eine MSRBASIC-ERROR-Meldung 


ERROR 5x IN LINE nnnn 
aus (s.u.!). 


Statuswort: Numerische Variable, die die Information über móg- 
liche Fehler bei der Ausführung der SENO/RECEIVE- 
Funktion wiederspiegelt: 


Status- ! ERROR- ! Bedeutung 
code ! code 
--------- φ--------φ-------------------------------------------- 
0 ! =- ! Übertragung fenlerfrei 
-------- νεος od reri er edid J 
1 ! 86 ! Der Name einer Slave-Größe 
! ist syntaktisch falsch 
soo ot «ο «ο «ο op φ--------φ------.Ὃ---------- «ο «- wë «Ὁ «ο o vm «Ἡ «Ὁ «ο «Ἡ «Ὁ «Ὁ -------- 
2 ! 62 ! Zeitüberschreitung beim Warten 
! auf Kanalfreigabe 
--------- φ------- »= 2-2 2 = 2. 2 2 22 22 2 2 7 2 2 2. -- 2 2 2 ---- = = 2 2 e e - 
3 ! $23 I Zeitüberschreitung beim Senden 
--------- LIN ------ -- 
E ! 56 ! Zeitüberschreitung beim Emp- 
! ! fangen 
----------- n 
S ! $5 I otschaft syntaktisch falsch 
! ! (z.B. verstummelte Zeichen, 
| ! Prüfsummenfehler) 
--------- φ---------ο-------------------------------------- ---------- 
6 ! 56 ! Botschaft inhaltlich falsch 
----------- Ab we we ep om wm em wm wm bon ---- wm o op o om om a --- ep o a a op op em om wm op om nm ep e > 


N8: Der ERROR-Code wird nur in der Testbetriebsart 
(Steuerwort >127) angezeigt. 


Beispiel: 


Im Masterprogramm soll der Inhalt der Variablen "ErrCod$” im MSR-BASIC- 
Slave Nr. 2 lesen und in seiner lokalen Variablen "ErrNam$” ablegen: í f 


VarNam$ "Qi:ErrCodS" 
ErrNam$ = RECEIVE(VarNam$,0,STWORT) 


H 
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8.3.1.2 SEND-FUNKTION 


Der Aufruf der Səndfunktion erfolgt nach der Syntax: 


SEND(XZielbezeichner»,«Steuerwort»,«Statuswort») = <Ausdruck> 
38915018] : 
SEND(VarNam$,CmdByt,StByt) = Quelle 


Bedeutung der Parameter: 


Zielbezeichner: Name der Slavegröße, die den Wert des Aus- 
drucks annehmen soll. 


8.3.1.3 PROZESSZUGRIFFE 


Der Master kann nicht nur auf Variable, sondern auch auf Prozeß-Ein- 
Ausgabekanale - lesend - zugreifen. 


Hierbei gibt es zwei Varianten: 


In der 1-Master-1-Slave-Version besitzt der Master das Prozeßabbild des 
Slave-Rechners, auf das er mit den üblichen Funktionen wie "ADC^, “DIN”, 
"DOUT" etc. zugreift. 


In der  !-Master-n-Slave-Version stellt das Master-Kommunikationsmodul 
spezielle Funktionen wie RADC (remote ADC), ROIN, RCNT, ROOUT, ROAC zur 
Verfügung, die grundsätzlich 2 Argumente aufweisen: 


(«Slave-Nr.»,«Kanal-Nr.») 


8.3.1.3.1 RADC(S,N) 
Einlesen eines 16-Bit-Werts vom Analogkanal N des 
entsprechenden Slave-Rechners S, 
Skalierung ist konfigurationsabhangig 
8.3.1.3.2 RDIN(S,N) 
Einlesen des Binarkanals N des Slave-Rechners S 
Wert beträgt 0 oder ! 


8.3.1.J.3 RCNT(S,N) 


Einlesen eines 16 Bit Zählerkanals N des entsprechenden 
Slave-Rechners S 
8.3.1.3.& ROOUT(S,N) 


Setzen des Binärkanals N des Slave-Rechners 5 
Wert beträgt 0 oder Nicht-Null 


8.3.1.3.5 RDAC(S,N) 
Ausgabe auf Stellkanal N (16 Bit genau ) des Slave- 
Rechners S, Skalierung ist konfigurationsabhängig 
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8.3.1.4 PERIODISCHES UPDATE 


Erfolgt ein Master-Proze8zugriff aus einer TASK oder einer SEQuenz her- 
aus, so sorgt das Kommunikationsmodul dafür, daß periodisch der gesamte 
E/A-Vektor des betroffenen Slaves angefordert wird. 


In dieser Betriebsart tritt keine Verzcgerung bei den Master-Zugriffs- 
funktionen. 


Falls mehrere Sekunden kein Anwenderprogrammzugriff auf eine Slaveeinheit 
erfolgt, wird der periodische Update-Mechanismus für diesen Teilnehmer 
eingestellt. 


8.3.2 SLAVE-FUNKTIONEN 
8.3.2.1 ΜΥ ADR 


In einer Sternstruktur braucht der Slave keine Adreßerkennung durchzu- 
führen, da die Adressierung implizit durch den Master vorgenommen wird. 
Dh. wenn eine Nachricht eintrifft, dann wird der Master die korrekte LU- 
Leitung schon gewählt haben. 


In einer Busstruktur ist hingegen die korrekte Funktion der Adreßerken- 
nung Grundvoraussetzung für den Betrieb des NTS. 


Hierbei muß jeder Slave eine eigene Adresse haben. Diese Adresse kann 
sowohl im Sinne einer Voreinstellung durch Konfiguration des MSR-BASIC- 
Interpreters festgelegt werden (siehe kapitel "Installation’) als auch 
jederzeit vom Slave-Anwenderprogramm aus abgefragt und modıfizert werden. 


Hierzu steht die numerische Systemvariable "MY AO0R^ zur Verfügung: 


Stationsadresse “n” setzen: ΜΥ AOR = n 
Stationsadresse abfragen: P(rint) MY ADR 


Über die Systemvariable MY ADR kann die lokale Teilnenmeradresse eines 
MSR-BASIC-Slaves gesetzt und abgefragt werden. 


Sonderfalle: 


Falls MY AOR den Wert O liefert, ist das betreffende MSR-BASIC- 
System als Master konfiguriert. 


Liefert MY_ADR den Wert -1, dann ist kein Kommunikationsmodul 
installiert. 
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8.4 DEMOPROGRAMM RECDEM.BAS 

8.6.1 ZWECK 

Das mitgelieferte Programm RECDEM.BAS veranschaulicht den  wahlfreien 
Zugriff eınes Masterrechners auf beliebige Hostvariable über die RECEIVE- 


Funktıon. Hierbei ist im Slaverechner kein Programm aktiv. 


Als Testaufbau kommt die 1-Master-1-Slave-Struktur zum Tragen (Bild). 


Φ---------- > Φ------------ * φρ----------- + 
I MSR-BASIC- !<------ >! MSR-BASIC- !<- - ->! Techn. ! 
! Master ! ! Slave ! I Prozeß L 
|#-—- < 2... ...- + rr * ν----------- + 
A À 
I I 
V γ 
φ----- * ρ----- D 
I CRT1! I CRIZ! 
φ----- » τος.» > 


Schaubild 8-4: 1-Master-1-Slave-Konfiguration für RECDEM 

8.4.2 FUNKTIONSBESCHREIBUNG 

Das Programm RECDEM greift im 1-s Takt (TASK 1) auf eine Slave-Variable 
zu, deren Namen in der Mastervariablen "VarNam$^ enthalten ist. 
Voreinstellung fuer den Variablennamen ist "ai" 

Der Slave-Variablenname, ihr aktueller Wert und der Status der letzten 


Übertragung werden in der obersten Zeile angezeigt (Bild). 


! Variable: a! = 0.0000E 00 (Een. ὁ) 


Schaubild 8-5: Bildschirmanzeige im Master 
Solange die gewünschte Variable im Slave noch nicht existiert, erscheint 
eine Fehlermeldung (Fen. 4). 


Andernfalls wird ihr aktueller Wert angezeigt. 
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8.4.3 DEMOEINGRIFFE 


Folgende 0emoeingriffe sollten durchgeführt werden: 


Eingriff Wirkung 
Am Slave: Master: 
41 manuell verändern aktuelle Wertanzeige 
Am Master: 
"VarNam$" verändern Fehlermeldung A, solange Variable — 


nicht existiert, ansonsten Wertanzeige 


Slavevariable vom Master Anderungsanzeige 
aus ändern, Z.B.: 


"SENO(VarNam$,a,b):120” 


8.4.4 LISTING 


100 REM RECDEM 07.10.87 


110 VarNamS= al” 

120 anzeig:! 

130 DEFINE TASK anzeig, 1,1000 

140 COMMAND(0):5*256 

150 PRINT A1,0U ^Slave-Variable: `; 
180 ACTIVATE TASK anzeig 

939 STOP 


1000 REM anzeig 


1010 IF LEN(VarNam$)=0 THEN RETURN 

1030 VarVal:RECEIVE(VarNam$,CmdByt,St8yt) 

1040 IF StByt THEN PRINT 41,500 "Feb, ^;StByt AS 11 ELSE PRINT 41,500 ` 
1050 PRINT A1,200 VarNam$; ^ = ^"; VarVal i 
1099 RETURN w 
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3. PROSRAMMIER-TIPS 


MSR-BASIC ist nicht nur ein leıstungsfähiges Werkzeug für die Lösung 
kleinerer  MSR-Aufgaben, sondern eignet sich auch für die komplette 
Automatisierung von Industrieanlagen mit Ein- und Mehrrechner-Systemen. 


Um derart komplaxe Anwendungen erfolgreich zu meistern, empfiehlt es 


sich, bei der Systemanalyse,  Programmkonzeption und [Implementierung ei- 
nige "goldene Regeln” zu beherzigen, die im folgenden als "Programmier- 
tips” formuliert sind und die Erfahrungen aus zahlreichen Anwendungen 
wlederspiegeln. 


9.1 SYSTEMANALYSE UNO PROGRAMM-KONZEPTION 
9.1.1 ANALYSE DER ERFORDERLICHEN PARALLELITAT 


Auch wenn es altvateriich klingt: Grundvoraussetzung für ein tragfähiges 
Echtzeit-Anwenderprogramm ist eine klare Spezifikation und ein darauf 
abgestimmtes Programmkonzept. 


Folgende Punkte sollten bei der Programmkonzeption der Reihe nach ge- 
klart werden: 


- In welche funktionell entkoppelten Teilbereiche kann dıe 
zu automatısierende Anlage zerlegt werden? 

- Welche Funktionen sollen/müssen parallel bearbeitet werden? 

- Welche Funktionen sind quasikontinuierlich oder ablauforıen- 
tiert? 


Im Prinzip wird jeder parallel ablaufenden Funktion en MSR-BASIC- 
Programm vom Typ TASK oder SEQuenz zugeordnet. 


Hierbei leistet eine Darstellung der Aufgabe in Form eines  Petrinetzes 
wertvolla Hilfe, da es den Grad an jeweils notwendiger  Parallelitat 
strukturell ausweist. 


Es empfiehlt sich jedoch im Sinne einer möglichst guten Übersichtlich- 
keit, die Anzahl an parallelen Programmen nicht über das nötige Maß 
hınaus anwachsen zu lassen. 


Hierzu werden Ablaufaktionen, die zwar parallel laufen können, ohne 
Verzicht auf die Güte des technischen Prozesses auch nacheinander 
ausgeführt werden können, als Teilaktionen einer SEQuenz formuliert. 


Beispiel: Wegeschaltung in Materialflußsystamen 


Bei Matarıalflußsystemen (7.3. Tanklager) tritt häufig die 


Aufgabe auf, einen neuen Weg zu schalten. Im konkreten Fall 
sollen die Ventile V2, V3, V8 geöffnet und die Ventile Vi, V5 
geschlossen werden, bevor über ein Ventil V!0 der Fluß 


freigegeben wird. 
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REGEL: "soviel Parallelitat wie nötig - so wenig wie moglich!" 

9.1.2 RESTRIKTIVE AUSLASTUNG 

Als weitere Grundregel bei der Konstruktion von Realzeitsystemen sollte 
man bei der Auslegung der Abtastzeiten eher restriktiv vorgehen, um der 


Gefahr einer auch nur partiellen Überlastung des Rechners vorzubeugen. 
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Bei jedem Ventil muß die Endposition überwacht werden, d. 


jeder Vorgang bestent aus den Aktionen: 


- Ventıl öffen (bzw. schließen) 
- max. n Sekunden warten, bis Endpositıon 
reicht, sonst Fehlerbehandlung 


Die einzelnen Öffnungs-/Schließungsvorgänge können parallel 
ablaufen. Dennoch ist es nicht sinnvoll, für jeden Vorgang eine 


SEQuenz zu "verbrauchen”. Vielmehr können alle Aktionen 
einer SEQuenz nach folgendem Schema durchgeführt werden: 


- Schließe bzw. öffne alle fraglichen Ventile 
[` DOUT(V1)=0, ... DOUT(V2)=1") 


- Warte max n Sekunden auf korrekte Positionsruckmeldung: 


WAIT MAX n FOR NOT(DIN(xV1)*0OIN(xV5) £ DIN(xV2]... ELSE xxx 


- Die Fehlerbehandlung in Zeile xxx analysiert dia Rückmelde- 


signale und liefert in der Variablen Errj die Fehlercodes: 


IF OIN(xV1) THEN Err$:Err$«^ V1^ 
IF DIN(xV5) THEN Err$sErr$+" VvV5^ 
IF OIN(xV2):0 THEN Err$s:Err$«^ νὰ" 


w 


9.2 PROGRAMM- IMPLEMENTIERUNG 
3.2.1 ANLAGENORIENTIERTE MODULARISIERUNG 


In aller Regel läßt sich eine größere Anlage in definierta Teilbereiche 
untergliedern. Diese Struktur ist beım Programmentwurf grundsätzlich 
dadurch zu berücksichtigen, daß 


a) alle zum Anlagenabschnitt gehörenden Programmteile  (TASKs 
und SEQuenzen) mäglichst einem zusammenhangenden Abschnitt 
im Gesantprogramm belegen (^"Kompaktheit") 


b) die Abhängigkeit der abschnittspezifischen Programmteile von 
den anderen anderen Abschnitten minimiert wird ("Lokalitat'") 


Diesen Zielen kann in MSR-BASIC mit folgenden Mittel Rechnung getragen 
werden: 


- Zeilennummer-Vergabe: Tausender-Gruppen für die Teilbereiche reservie- 
ren, 2.9. 
2000 bis 2999: Anlagenabschnitt 1 
3090 bis 3999: Anlagenabschnıtt 2 
etc. 


- Standard-Speicherbelagungs-Struktur: 


x000 e ze rm zm rm ooo + 
I Inıtialisierung ! 


δ----------------- 5 
φ--------------------- + 
xy00 ! Sequenz i ! 
Φ--------------- * 
xz00 I Sequenz Lei ! 


- Programm-Module logisch verschieblich machen: 
Jeder Programmabschnitt benötigt eine bestimmte Zahl an  MSR-8ASIC- 
Betriebsmittel (| SEQuenzen, TASKs, TUPs, TDOWNs, FOR/NEXT-Schleifen- 
zahler). 


Mit Hilfe globaler Zustands-Variabler (Vorschlag: "az", "ES", “tuz” 
und "tdz’) richtet sich bei der Initialisierung jeder Programmab- 
schnitt hinsichtlich seiner SEQuenz-, TASK-, TUP- und TDOWN-Nummern- 


vergabe nach dem vorgegebenen Stand und modifiziert die Zustands- 
Variablen entsprechend. 
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2900 REM Ini-Vorreinigung 
2005 REM 2 SEQuenzen: Haupt- 
2010 VRHpt = sz, sz-sz«1 
2011 DEFINE SEQ VRHpt,2200 
2012 VRman = sz, sz=sz+1 
2013 DEFINE SEQ VRman, 2800 
2020 REM 1 TDOWN-Zeitgeber 
2025 t VR = tdz, tdz:tdz«! 
2099 RETURN Ini VR 
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und Manual-Betrıeb 


SEITE 


Mit 


9.3 WEITERE PROGRAMMIERTIPS 
- kleınschreibung für Variablennamen verwenden: 
Vergleiche: 


IF HANO + NOTAUS THEN DOUT(HAUPT):0 
IF Hand + Notaus THEN DYUT(Haupt):=:0 


- Sprungziele von GOTO,GOSUB,THEN,ELSE als REM markieren: 


380 GOTO 1020 
1020 REM t 
1030 


Vorteile: Höhare Übersichtlichkeit 
Hohere Sicherheit gegen Programmierfehler 
- Symbolische Namen für E/A-Kanale verwenden 
Vergleiche: 
WAIT FOR DIN(123)*0IN(121)*0IN(125) 
WAIT FOR OIN(Maxt)*OI[N(Frai1)*0[N(Stop) 
Vorteile: hohere Selbstdokumentation 
Zentrale Änderung durch Neuzuweisung an Variable moglich 
Bessere Weiterverwendbarkeit von Programmm 
- Symbolische Namen für Logische Einheiten verwenden 
OPEN  FiinamS$S,ErrLU,1 
IF 8IT(FOpen, STATUS(ErrLU)):Q0 THEN 
- Symbolische Namen für Zeitgeber verwenden: 
if tdown(t_regl)>0 then return 
tdown(t_regl) = T_Regl 
- Symbolische Namen für TASKs und SEQuenzen verwenden 
Vergleiche: 
IF OIN(3):0 THEN SUSPENO TASK 2 


IF DIN(AStop)=0 THEN SUSPEND TASK Anzeig 
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VORTEILE: 
- TASK-/SEQ-Module werden dadurch “verschieblich'”,.d.h. das Verän- 
dern der TASK-/SEQ-Prioritát wirkt nicht auf die ACTIVATE- 
SUSPEND-Anweilsungen zurück. Aus dem gleichen Grund können Modu- 


le mit symbolischer "Adressierung" leichter weiterverwertet 
werden. 


- Bildschirm-Steuerzeichen zentral als String-8lock definieren: 


esc$ :CHR$(27) 
eirsal$ e riesi 
invon$ = ..... 
invof$ = ..... 


Yorteil; Hauptteil des Programms bleibt terminal-unabhängıg, dal 
Steuersequenzen über ihren Namen (“symbolisch”) ange- 
sprochen werden. 


- Bei Parameterubergabe an Unterprogramme MAT-Anweisung einsetzen: 
MAT <arbeitsmatrix>=<Haupt-Matrıx> 


GOSUB 
MAT <Hauptmatrıx> =<Arbeltsmatrıx> 
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10. FEHLERMELDUNGEN 


00 interner Konsistenzfehler beim Listen 

01 inkompatibler Datentyp z.B.: x=a$ 

02 unerlaubte Kontrollvariable in PRINT- oder INPUT-and-proceed 
03 nach END existiert noch eine Programmzeile 


04 fehlerhafte Zeilennummer in GOTO etc. 
05 gewunschte Zeilennummer existiert nicht 
06 ein unerwartetes Zeichen verursachte den Fehler 


07 ein Statement wurde nicht beendet 

08 ein Statement wurde fehlerhaft formuliert 

09 Fehler beim Wandeln einer numerischen Konstanten 

10 aine Funktion wurde falsch benutzt (linke statt rechte Saite etc.) 

11 Feldzugriff stimmt nicht mit Felddeklaration überein (Dimensionali- 
tat, bzw. Datentyp) 

12 Zugriff auf Feld vor seiner Definition 

13 Fehler bei der Bestimmung einer Zahl - zu groß 

14 unerlaubte Relation in einem IF - o. WAIT-Statement 

15 Nummer eines Assembler-UPs wurde nicht gefunden 


FOR-NEXT-Fehler 


16 fehlendes '= in einem FOR-Statement 
E? fehlendes TO oder STEP 
18 Ineinanderschachtelung von mehr als 10 Laufvariablen 


19 NEXT wurde vor FOR ausgeführt 

20 Laufvariable in FOR und NEXT stimmen nicht überein bzw. bereits 
vorhanden (Multitasking!) 

21 Laufvariable ist ein Vektor oder String 


22 das gewunschte Vektorelement existiert nicht 

23 Anzahl der übergebenen Parameter bei Funktionen mehrerer  Variablerc 
stimmt nicht (z.8.:PID) 

24 Dimensionen zweier Vektoren stimmen nicht überein 

25 Fehler (Hardware) im I/O-Verkehr 

28 Task bzw. Ablaufsteuerung sollte aktiviert bzw. desaktiviert werden, 
bevor sie singetragen war 

27 WAIT wurde als direktes Statement benutzt 

28 Zeitüberschreitung beim Warten auf das Eintreffen einer Verriege- 
lungsbedingung 

29 Fehler bei der Bestimmung einer logischen Kanaladresse 


Matrix-Vektor-Fehler 


30° unerlaubter Operand im MAT-Statement 

J3 falsche Reihenfolge von MAT-Operatoren 

32 inkonsistente Dimension auf der rechten Seite 

33 Zielfeld zu klein dimensioniert 

WU Vektor zu groß ( »126 ) für MAT-Operation 

35 Zielfeld auch auf rechter Seite des MAT-Statements 
36 zuwenig Speicher für Ablage der Zwischenergebnisse 
37 interner Konsistenzfehler (Entschuldigung!) 
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38 
39 
40 
$1 
2 


WAIT in GOSUB-Unterprogramm nicht ərlaubt 

(reserviert) 

Interpreter nicht in Echtzeit-Betriebsart (FREEZE-Kommando eingeben!) 
INPUT-Anweisung wurde zweimal aufgesetzt (Multitasking) 

Timeout bei Ausgabe auf seriellem Kanal 


Dateiverwaltungs-Fehler (nur in CP/M-Umgebung) 


50 


52 
33 
56 
55 
36 
57 


. 38 


53 
78 


unbekannter oder in der vorliegenden Fassung nicht implementierter 
Befehl (Funktion): 

Dateiname ungultig 

Datei nicht vorhanden bzw. Directory-Fehler 

Diskette voll 

Fehler beim Schlie8en einer Datei 

LU existiert nicht E 
LU, die geöffnet werden soll, ist bereits geöffnet 

lesen von einer als write-only eröffneten Datei w 
schreiben auf aine als read-only eröffnete Datei 

interner Konsistenzfenler 
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